Metrics for Destination given bearing on a great circle

start0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated

analyze1.2s (7.5%)

Memory

14.0MiB live, 1 153.9MiB allocated

Algorithm

1×

Search

Probability	Valid	Unknown	Precondition	Infinite	Domain	Can't	Iter
0%	0%	99.8%	0.2%	0%	0%	0%	0
0%	0%	99.8%	0.2%	0%	0%	0%	1
0%	0%	99.8%	0.2%	0%	0%	0%	2
0%	0%	99.8%	0.2%	0%	0%	0%	3
0%	0%	99.8%	0.2%	0%	0%	0%	4
0%	0%	99.8%	0.2%	0%	0%	0%	5
0%	0%	99.8%	0.2%	0%	0%	0%	6
0%	0%	99.8%	0.2%	0%	0%	0%	7
0%	0%	99.8%	0.2%	0%	0%	0%	8
0%	0%	99.8%	0.2%	0%	0%	0%	9
0%	0%	99.8%	0.2%	0%	0%	0%	10
1.6%	1.6%	98.2%	0.2%	0%	0%	0%	11
1.6%	1.6%	98.2%	0.2%	0%	0%	0%	12

Compiler

Compiled 35 to 25 computations (28.6% saved)

sample3.0s (18%)

Memory

78.9MiB live, 2 616.7MiB allocated

Samples

2.4s

8 256×

valid

Precisions

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

ival-sin: 691.0ms (33.9% of total)

ival-cos: 607.0ms (29.8% of total)

ival-mult: 388.0ms (19% of total)

ival-asin: 152.0ms (7.5% of total)

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

ival-atan2: 64.0ms (3.1% of total)

ival-sub: 51.0ms (2.5% of total)

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

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

Bogosity

explain575.0ms (3.5%)

Memory

-0.6MiB live, 528.0MiB allocated

FPErrors

Click to see full error table

Ground Truth	Overpredictions	Example	Underpredictions	Example	Subexpression
5	3	(-4.8095696565904986e-95 -1.9727780844621627e+65 1.300721666494405e-101 6.939008474610844e+148 -6.0006571701376e+87)	1	(-4.038423418023171e-246 1.0780776076822333e+101 1.643016412112539e-180 -4.374356645946883e-127 -7.77275320044761e+193)	`(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))`
2	0	-	2	(-1.8647674292239756e+52 1.8633630130272994e-49 -2.1136105654774846e-26 -5.9485203899100996e+66 -1.0033805263126106e-252)	`(asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))`
0	0	-	0	-	`(cos.f64 theta)`
0	0	-	0	-	`theta`
0	0	-	0	-	`(sin.f64 theta)`
0	0	-	0	-	`(.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))`
0	0	-	0	-	`(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))`
0	0	-	0	-	`delta`
0	0	-	0	-	`(sin.f64 phi1)`
0	0	-	0	-	`(*.f64 (sin.f64 phi1) (cos.f64 delta))`
0	0	-	0	-	`lambda1`
0	0	-	0	-	`(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))`
0	0	-	0	-	`(+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))`
0	0	-	0	-	`(*.f64 (sin.f64 theta) (sin.f64 delta))`
0	0	-	0	-	`phi1`
0	0	-	0	-	`(*.f64 (cos.f64 phi1) (sin.f64 delta))`
0	0	-	0	-	`(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))`
0	0	-	0	-	`(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))`
0	0	-	0	-	`(sin.f64 delta)`
0	0	-	0	-	`(sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))`
0	0	-	0	-	`(cos.f64 delta)`
0	0	-	0	-	`(cos.f64 phi1)`

Explanations

Click to see full explanations table

Operator	Subexpression	Explanation	Count
`-.f64`	`(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))`	cancellation	2	1

Confusion

	Predicted +	Predicted -
+	1	0
-	1	254

Precision

0.5

Recall

1.0

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	1	0	0
-	1	4	250

Precision?

0.16666666666666666

Recall?

1.0

Freqs

test

number	freq
0	254
1	2

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

213.0ms

512×

valid

Compiler

Compiled 436 to 73 computations (83.3% saved)

Precisions

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

ival-sin: 51.0ms (32.9% of total)

ival-cos: 49.0ms (31.6% of total)

ival-mult: 28.0ms (18.1% of total)

ival-sub: 9.0ms (5.8% of total)

ival-asin: 8.0ms (5.2% of total)

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

ival-atan2: 4.0ms (2.6% of total)

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

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

preprocess256.0ms (1.6%)

Memory

18.7MiB live, 92.3MiB allocated

Algorithm

1×	egg-herbie

Rules

1 618×	`distribute-rgt-in`
1 602×	`distribute-lft-in`
1 294×	`distribute-lft-neg-in`
1 050×	`sub-neg`
794×	`neg-mul-1`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	179	677
1	399	672
2	699	670
3	1226	668
4	2722	668
5	4034	668
6	4664	668
7	5393	668
8	5778	668
9	5943	668
10	6050	668
11	6182	668
12	6432	668
13	6965	668
14	7098	668
15	7124	668
16	7124	668
17	7124	668
0	22	33
0	40	33
1	57	33
2	82	33
3	97	33
4	113	33
5	141	33
6	189	33
7	238	33
8	321	33
9	360	33
10	394	33
11	446	33
12	537	33
13	671	33
14	822	33
15	1117	33
16	1189	33
17	1208	33
18	1210	33
19	1213	33
20	1215	33
0	1215	32

Stop Event

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

Calls

Call 1

Inputs

(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))

Outputs

(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))

(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 (asin.f64 (fma.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))

Symmetry

(abs phi2)

Compiler

Compiled 38 to 23 computations (39.5% saved)

eval0.0ms (0%)

Memory: 0.4MiB live, 0.4MiB allocated
Compiler: Compiled 5 to 5 computations (0% saved)

prune1.0ms (0%)

Memory

2.1MiB live, 2.1MiB allocated

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))

Status

Accuracy

Program

▶

99.7%

(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))

Compiler

Compiled 38 to 23 computations (39.5% saved)

simplify54.0ms (0.3%)

Memory

3.1MiB live, 40.5MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 4 expressions of interest:

New	Metric	Score
cost-diff	0	(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
cost-diff	0	(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
cost-diff	0	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
cost-diff	128	(+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))

Rules

640×	`lower-fma.f64`
640×	`lower-fma.f32`
496×	`lower-*.f32`
484×	`lower-*.f64`
244×	`associate-r`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	22	197
0	40	197
1	57	197
2	82	197
3	97	197
4	113	197
5	141	197
6	189	197
7	238	197
8	321	197
9	360	197
10	394	197
11	446	197
12	537	197
13	671	197
14	822	197
15	1117	197
16	1189	197
17	1208	197
18	1210	197
19	1213	197
20	1215	197
0	1215	190

Stop Event

1×	iter limit
1×	saturated
1×	iter limit

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
(cos.f64 delta)
(.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(sin.f64 phi1)
(sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(cos.f64 theta)

Outputs
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 (asin.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 (asin.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
(fma.f64 (sin.f64 (asin.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(cos.f64 delta)
(.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(sin.f64 phi1)
(sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(sin.f64 (asin.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))
(asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(asin.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(cos.f64 theta)

localize139.0ms (0.8%)

Memory

-74.3MiB live, 186.3MiB allocated

Localize:

Found 4 expressions of interest:

New	Metric	Score
accuracy	0.19921875	(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy	0.26791000976844204	(.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
accuracy	0.34446632241209263	(asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
accuracy	0.47007243369843144	(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))

Samples

117.0ms

256×

valid

Compiler

Compiled 199 to 25 computations (87.4% saved)

Precisions

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

ival-sin: 28.0ms (38.8% of total)

ival-mult: 17.0ms (23.5% of total)

ival-cos: 14.0ms (19.4% of total)

ival-add: 6.0ms (8.3% of total)

ival-asin: 4.0ms (5.5% of total)

ival-atan2: 2.0ms (2.8% of total)

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

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

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

series46.0ms (0.3%)

Memory

-1.5MiB live, 74.4MiB allocated

Counts

8 → 288

Calls

Call 1

Inputs
#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())
#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())
#s(alt (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())
#s(alt (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (patch (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #<representation binary64>) () ())
#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())

Outputs
#s(alt (* (cos theta) (sin delta)) (taylor 0 phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (cos delta) (* -1/2 (* phi1 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* phi1 (cos delta))))))) (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (sin phi1) (taylor 0 delta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))) (taylor 0 delta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))))) (taylor 0 delta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (* delta (* (cos phi1) (cos theta)))))) (* (cos phi1) (cos theta))))) (taylor 0 delta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf delta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf delta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf delta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf delta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf delta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf delta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf delta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf delta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (taylor 0 theta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/24 (* (cos phi1) (sin delta))))))))) (taylor 0 theta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf theta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf theta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf theta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf theta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf theta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf theta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf theta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf theta) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (patch (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta)))) (taylor 0 theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta)))))))) (taylor 0 theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta))))))))) (taylor 0 theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (sin theta))) (taylor 0 delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta)))) (taylor 0 delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta)))))))) (taylor 0 delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta))))))))) (taylor 0 delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor 0 phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta))) (taylor 0 phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta))))))) (taylor 0 phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta)))))))) (taylor 0 phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (patch (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 delta) (#s(alt (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 delta) (#s(alt (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 delta) (#s(alt (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 delta) (#s(alt (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 theta) (#s(alt (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 theta) (#s(alt (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 theta) (#s(alt (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor 0 theta) (#s(alt (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (patch (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (patch (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (patch (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta)))) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (patch (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/3 (* phi1 (cos delta))) (* -1/6 (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta)))) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (patch (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (patch (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (patch (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (patch (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (patch (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (patch (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (patch (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (patch (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (patch (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor 0 delta) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (patch (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (patch (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* delta (+ (* -1/2 (* delta (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (patch (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* delta (+ (* delta (+ (* -1/2 (pow (sin phi1) 2)) (* -1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (patch (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (patch (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (patch (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (patch (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (patch (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (patch (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (patch (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (patch (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (patch (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (patch (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (patch (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (patch (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1))))))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (patch (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (patch (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (patch (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (patch (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (patch (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (patch (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (patch (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (patch (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (patch (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta))))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta)))))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor 0 delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta))))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta))))))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta)))))))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())

Calls

72 calls:

Time	Variable		Point	Expression
6.0ms	theta	@	inf	(+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))
3.0ms	phi1	@	-inf	(- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))
2.0ms	phi1	@	inf	(+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))
2.0ms	delta	@	inf	(+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))
2.0ms	theta	@	-inf	(+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))

simplify302.0ms (1.8%)

Memory

5.9MiB live, 443.4MiB allocated

Algorithm

1×	egg-herbie

Rules

18 094×	`lower-fma.f64`
18 094×	`lower-fma.f32`
6 000×	`lower-*.f64`
6 000×	`lower-*.f32`
4 424×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	281	5807
1	976	5684
2	3423	5625
3	5995	5582
0	8162	5302

Stop Event

1×	iter limit
1×	node limit

Counts

288 → 286

Calls

Call 1

Inputs
(* (cos theta) (sin delta))
(+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))
(+ (* phi1 (+ (cos delta) (* -1/2 (* phi1 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta)))
(+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* phi1 (cos delta))))))) (* (cos theta) (sin delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(sin phi1)
(+ (sin phi1) (* delta (* (cos phi1) (cos theta))))
(+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))))
(+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (* delta (* (cos phi1) (cos theta)))))) (* (cos phi1) (cos theta)))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/24 (* (cos phi1) (sin delta)))))))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(* theta (* (cos phi1) (sin delta)))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* delta (* (cos phi1) (sin theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (sin delta) (sin theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(- 1 (pow (sin phi1) 2))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(cos delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/3 (* phi1 (cos delta))) (* -1/6 (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(pow (sin phi1) 2)
(+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))
(+ (* delta (+ (* -1/2 (* delta (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(+ (* delta (+ (* delta (+ (* -1/2 (pow (sin phi1) 2)) (* -1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))
(+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* theta (sin delta))
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* delta (sin theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))

Outputs
(* (cos theta) (sin delta))
(*.f64 (cos.f64 theta) (sin.f64 delta))
(+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))
(fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 phi1 (cos.f64 delta)))
(+ (* phi1 (+ (cos delta) (* -1/2 (* phi1 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta)))
(fma.f64 (fma.f64 phi1 (.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))
(+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* phi1 (cos delta))))))) (* (cos theta) (sin delta)))
(+.f64 (fma.f64 (fma.f64 phi1 (.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 phi1 (cos.f64 delta))) (.f64 phi1 (.f64 phi1 (.f64 (*.f64 phi1 (cos.f64 delta)) #s(literal -1/6 binary64)))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(sin phi1)
(sin.f64 phi1)
(+ (sin phi1) (* delta (* (cos phi1) (cos theta))))
(fma.f64 (cos.f64 theta) (*.f64 delta (cos.f64 phi1)) (sin.f64 phi1))
(+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))))
(fma.f64 (fma.f64 delta (.f64 delta #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sin.f64 phi1) (.f64 (cos.f64 theta) (*.f64 delta (cos.f64 phi1))))
(+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (* delta (* (cos phi1) (cos theta)))))) (* (cos phi1) (cos theta)))))
(fma.f64 delta (fma.f64 delta (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) (.f64 (fma.f64 delta (.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)) (.f64 (cos.f64 theta) (cos.f64 phi1)))) (sin.f64 phi1))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))
(fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(fma.f64 (sin.f64 delta) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 theta theta) #s(literal 1 binary64)) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(fma.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (.f64 theta theta) (fma.f64 (.f64 theta theta) (.f64 (.f64 theta theta) #s(literal 1/24 binary64)) #s(literal 1 binary64))) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/24 (* (cos phi1) (sin delta)))))))))
(fma.f64 (sin.f64 delta) (cos.f64 phi1) (fma.f64 (.f64 theta theta) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 (.f64 theta theta) (fma.f64 (.f64 theta theta) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(literal -1/2 binary64))) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(-.f64 lambda1 (neg.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(-.f64 lambda1 (neg.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(-.f64 lambda1 (neg.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(-.f64 lambda1 (neg.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(-.f64 lambda1 (neg.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(-.f64 lambda1 (neg.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(* theta (* (cos phi1) (sin delta)))
(.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 theta (.f64 #s(literal -1/6 binary64) (.f64 theta theta)) theta))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(.f64 theta (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) (fma.f64 (.f64 theta theta) (.f64 (*.f64 theta theta) #s(literal 1/120 binary64)) #s(literal 1 binary64)))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(.f64 theta (fma.f64 (sin.f64 delta) (cos.f64 phi1) (.f64 (.f64 theta theta) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 (.f64 theta theta) (fma.f64 (*.f64 theta theta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* delta (* (cos phi1) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 delta (sin.f64 theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 delta (.f64 #s(literal -1/6 binary64) (.f64 delta delta)) delta))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(.f64 delta (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (*.f64 delta delta)) #s(literal 1 binary64)))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(.f64 delta (fma.f64 (.f64 delta delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 (.f64 delta delta) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta delta) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 theta))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1 binary64))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(fma.f64 (.f64 phi1 phi1) (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 (.f64 phi1 phi1) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)) #s(literal -1/2 binary64))) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 delta (.f64 delta (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (.f64 (cos.f64 phi1) (fma.f64 delta (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 delta (.f64 delta (fma.f64 (sin.f64 phi1) (fma.f64 (.f64 delta #s(literal 1/6 binary64)) (.f64 (cos.f64 theta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) #s(literal 1/2 binary64))) #s(literal -1/2 binary64))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) phi1)))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 phi1 (cos.f64 delta))) (neg.f64 phi1) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 phi1 (neg.f64 (fma.f64 phi1 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 #s(literal -2/3 binary64) phi1) (cos.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 delta)))) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (cos.f64 phi1) (.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(+.f64 (cos.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 theta theta) #s(literal 1 binary64)) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (.f64 theta theta) (.f64 (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 (.f64 theta theta) #s(literal -1/24 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (.f64 theta theta) (.f64 (.f64 theta theta) (.f64 (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 (.f64 theta theta) #s(literal 1/720 binary64) #s(literal -1/24 binary64))))) (+.f64 (cos.f64 delta) (neg.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 theta theta) #s(literal 1 binary64)) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(* phi1 (* (cos theta) (sin delta)))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) phi1))
(* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))
(.f64 phi1 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 phi1 (cos.f64 delta))))
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))
(.f64 phi1 (fma.f64 phi1 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 #s(literal -2/3 binary64) phi1) (cos.f64 delta)) (.f64 (cos.f64 theta) (sin.f64 delta))))
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/3 (* phi1 (cos delta))) (* -1/6 (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta))))
(.f64 phi1 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 phi1 (fma.f64 phi1 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) #s(literal -2/3 binary64)) (.f64 (*.f64 phi1 (cos.f64 delta)) #s(literal -1/3 binary64))) (cos.f64 delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (sin.f64 phi1)))
(+ (* delta (+ (* -1/2 (* delta (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(fma.f64 delta (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 phi1))) (.f64 (fma.f64 delta (.f64 delta #s(literal -1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(+ (* delta (+ (* delta (+ (* -1/2 (pow (sin phi1) 2)) (* -1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(fma.f64 delta (fma.f64 (fma.f64 delta (.f64 delta #s(literal -1/6 binary64)) #s(literal 1 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 phi1))) (.f64 delta (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (cos.f64 phi1) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 theta theta) #s(literal 1 binary64)) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))
(fma.f64 (.f64 (sin.f64 delta) (.f64 (sin.f64 phi1) (cos.f64 phi1))) (+.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (.f64 theta theta) (.f64 (.f64 theta theta) #s(literal 1/24 binary64)))) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(fma.f64 (.f64 theta theta) (.f64 (.f64 (sin.f64 delta) (.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 (.f64 theta theta) (fma.f64 (.f64 theta theta) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(literal -1/2 binary64))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (cos.f64 phi1) (.f64 (cos.f64 delta) (sin.f64 phi1)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(.f64 theta (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(.f64 theta (.f64 (sin.f64 delta) (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) (fma.f64 (.f64 theta theta) (.f64 (.f64 theta theta) #s(literal 1/120 binary64)) #s(literal 1 binary64)))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(.f64 theta (fma.f64 (.f64 theta theta) (.f64 (sin.f64 delta) (fma.f64 (.f64 theta theta) (fma.f64 (*.f64 theta theta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) (sin.f64 delta)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(.f64 (sin.f64 theta) (fma.f64 delta (.f64 #s(literal -1/6 binary64) (*.f64 delta delta)) delta))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta)) #s(literal 1 binary64)))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(.f64 delta (fma.f64 (.f64 delta delta) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) (sin.f64 theta)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))

rewrite371.0ms (2.3%)

Memory

14.7MiB live, 526.5MiB allocated

Rules

6 986×	`lower-fma.f64`
6 986×	`lower-fma.f32`
5 942×	`lower-*.f32`
5 930×	`lower-*.f64`
3 900×	`lower-/.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	22	147
0	40	139
1	120	139
2	846	139
0	8744	133

Stop Event

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

Counts

8 → 340

Calls

Call 1

Inputs
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
(asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(*.f64 (sin.f64 theta) (sin.f64 delta))

Outputs
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(+.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))))
(+.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))))))
(+.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(+.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (neg.f64 (/.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))) (.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(cos.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))
(-.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))))
(-.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))
(-.f64 (.f64 (sin.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 (PI.f64) #s(literal 1/2 binary64))) (.f64 #s(literal 2 binary64) (PI.f64))))) #s(literal 0 binary64)) (.f64 (cos.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 (PI.f64) #s(literal 1/2 binary64))) (.f64 #s(literal 2 binary64) (PI.f64))))) #s(literal 1 binary64)))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(sin.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta))) #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(fma.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))))
(fma.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (neg.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))))))
(fma.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))))
(fma.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (neg.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))))))
(fma.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (neg.f64 (/.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))
(fma.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))))
(fma.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (neg.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))))))
(fma.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))
(fma.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(fma.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))))
(fma.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))))))
(fma.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(fma.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (.f64 (sin.f64 phi1) (cos.f64 delta))))))) (.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))))
(fma.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (.f64 (sin.f64 phi1) (cos.f64 delta))))))) (neg.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))))))
(fma.f64 (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) (.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))))
(fma.f64 (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) (neg.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))))))
(fma.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(fma.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))))) (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))))
(fma.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))))) (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (neg.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))))))
(fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(neg.f64 (neg.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (.f64 (sin.f64 phi1) (cos.f64 delta))))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))
(/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (.f64 (sin.f64 phi1) (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))))
(/.f64 (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64))))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (+.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)))) (.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 9 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 9 binary64))) #s(literal 1 binary64)) (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 6 binary64)) (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 6 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 6 binary64))) #s(literal 1 binary64)) (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 6 binary64))) #s(literal 1 binary64)) (.f64 (+.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 4 binary64))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 4 binary64))) #s(literal 1 binary64)) (.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)))))) (neg.f64 (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))))) (neg.f64 (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (fma.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))) (.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64))) (fma.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (/.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))) (.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))))) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(/.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) (.f64 (/.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal -1 binary64))
(.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(.f64 (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))))) (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (neg.f64 (/.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))))
(-.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (/.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))
(-.f64 (/.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (/.f64 (.f64 lambda1 lambda1) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)))
(fma.f64 (.f64 lambda1 lambda1) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (neg.f64 (/.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))))
(neg.f64 (/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64))) (neg.f64 (fma.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (.f64 lambda1 lambda1)))))
(neg.f64 (/.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))))
(neg.f64 (/.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64)))) (fma.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (.f64 lambda1 lambda1))))
(neg.f64 (/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (.f64 lambda1 lambda1)))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (.f64 lambda1 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (.f64 lambda1 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (-.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (.f64 lambda1 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(/.f64 (-.f64 (.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))) (.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))
(/.f64 (.f64 (fma.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda1 (.f64 lambda1 lambda1))) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 9 binary64))) #s(literal 1 binary64)) (.f64 (-.f64 (fma.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda1 (.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64))) (pow.f64 (.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (.f64 (-.f64 (.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda1 (.f64 lambda1 lambda1))) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64))) #s(literal 1 binary64)) (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (.f64 lambda1 lambda1))))
(/.f64 (.f64 (-.f64 (.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda1 (.f64 lambda1 lambda1))) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 6 binary64))) #s(literal 1 binary64)) (.f64 (+.f64 (fma.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) lambda1 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64))) (pow.f64 (.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))
(/.f64 (.f64 (-.f64 (.f64 (.f64 lambda1 lambda1) (.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 4 binary64))) #s(literal 1 binary64)) (.f64 (fma.f64 lambda1 lambda1 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (.f64 lambda1 lambda1)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)))
(/.f64 (-.f64 (pow.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #s(literal 3 binary64))) (fma.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (fma.f64 (/.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (/.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (/.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))))))
(/.f64 (-.f64 (.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))) (.f64 (/.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (/.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))) (+.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (/.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #s(literal -1 binary64))
(.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (.f64 lambda1 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))))
(.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))
(.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))
(.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)))))
(.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))))
(.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1))))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1))) #s(literal -2 binary64))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(.f64 (sin.f64 delta) (.f64 (sin.f64 theta) (cos.f64 phi1)))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(.f64 (sin.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)))
(.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta))
(.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(.f64 (.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal 1/2 binary64))
(.f64 (.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1)) #s(literal 1/2 binary64))
(+.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1))))
(+.f64 (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))
(+.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (neg.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))) (neg.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))
(+.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))
(+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta)))
(+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (fma.f64 (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1))) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))
(+.f64 (+.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))))
(+.f64 (+.f64 (cos.f64 delta) (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))
(+.f64 (+.f64 (cos.f64 delta) (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1))))
(+.f64 (+.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)))) (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))))
(+.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64))) (.f64 (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64)))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(-.f64 #s(literal 0 binary64) (-.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (cos.f64 delta)))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))))
(-.f64 (+.f64 (cos.f64 delta) #s(literal 0 binary64)) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(-.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))
(-.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))
(-.f64 (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(-.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (cos.f64 delta))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (neg.f64 (sin.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))) #s(literal -1/2 binary64) (cos.f64 delta))
(fma.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (neg.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))) (neg.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta)) (fma.f64 (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))
(fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))))) #s(literal 1/2 binary64) (cos.f64 delta))
(fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (cos.f64 delta))
(fma.f64 (.f64 (cos.f64 delta) (neg.f64 (sin.f64 phi1))) (sin.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 delta) (neg.f64 (sin.f64 phi1))) (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (neg.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 delta))
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (cos.f64 delta))
(fma.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal -1 binary64)) (sin.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta)))
(fma.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal -1 binary64)) (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal -1 binary64)) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (sin.f64 delta) (cos.f64 theta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta)) (.f64 (cos.f64 phi1) (cos.f64 theta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal -1 binary64)) (sin.f64 phi1) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta)))
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) #s(literal 1/2 binary64) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta)))
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) #s(literal 1/2 binary64) (fma.f64 (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(neg.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64))) (neg.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))
(neg.f64 (/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(neg.f64 (/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (.f64 (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1))) (-.f64 (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (.f64 (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1))) (-.f64 (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (.f64 (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1))) (-.f64 (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))
(/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)))) (.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))) (.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)))) (.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))))
(/.f64 (.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 9 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 9 binary64))) #s(literal 1 binary64)) (.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 6 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 6 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(/.f64 (.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 6 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 6 binary64))) #s(literal 1 binary64)) (.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(/.f64 (.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 6 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 6 binary64))) #s(literal 1 binary64)) (.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 4 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))))
(/.f64 (.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 4 binary64))) #s(literal 1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (fma.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))) #s(literal 3 binary64))) (fma.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))) (fma.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(/.f64 (-.f64 (.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (-.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))) (.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal -1 binary64))
(.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)) (.f64 (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1))) (-.f64 (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))))))
(.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))))
(.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))
(+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 (PI.f64) #s(literal 1/2 binary64))) (.f64 #s(literal 2 binary64) (PI.f64)))) (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(+.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 (PI.f64) #s(literal 1/2 binary64))) (.f64 #s(literal 2 binary64) (PI.f64)))) (*.f64 (neg.f64 (PI.f64)) #s(literal 1/2 binary64)))
(+.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (.f64 (PI.f64) #s(literal 1/2 binary64))) (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))
(-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(-.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 (PI.f64) #s(literal 1/2 binary64))) (.f64 #s(literal 2 binary64) (PI.f64)))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))
(-.f64 (/.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (fma.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64) (.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (+.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) (/.f64 (pow.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (fma.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64) (.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (+.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(-.f64 (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (/.f64 (pow.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))
(fma.f64 #s(literal 1 binary64) (.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(fma.f64 (neg.f64 (PI.f64)) #s(literal -1/2 binary64) (neg.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64) (.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (+.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (-.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) (-.f64 (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (pow.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64))) (fma.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64) (.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (+.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 (PI.f64) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (pow.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64) (.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (+.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (pow.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))))
(/.f64 (fma.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64) (pow.f64 (neg.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64))) (fma.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64) (-.f64 (.f64 (neg.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) (neg.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))))))
(/.f64 (-.f64 (pow.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 (PI.f64) #s(literal 1/2 binary64))) (.f64 #s(literal 2 binary64) (PI.f64)))) #s(literal 3 binary64)) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64))) (fma.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 (PI.f64) #s(literal 1/2 binary64))) (.f64 #s(literal 2 binary64) (PI.f64)))) (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 (PI.f64) #s(literal 1/2 binary64))) (.f64 #s(literal 2 binary64) (PI.f64)))) (fma.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64) (.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 (PI.f64) #s(literal 1/2 binary64))) (.f64 #s(literal 2 binary64) (PI.f64)))) (.f64 (PI.f64) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (.f64 (neg.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) (neg.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))) (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))))
(/.f64 (-.f64 (.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 (PI.f64) #s(literal 1/2 binary64))) (.f64 #s(literal 2 binary64) (PI.f64)))) (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 (PI.f64) #s(literal 1/2 binary64))) (.f64 #s(literal 2 binary64) (PI.f64))))) (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64))) (+.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 (PI.f64) #s(literal 1/2 binary64))) (.f64 #s(literal 2 binary64) (PI.f64)))) (.f64 (PI.f64) #s(literal 1/2 binary64))))
(asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))
(.f64 (-.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64) (.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (+.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(.f64 (-.f64 (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (pow.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(+.f64 (.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64)) (neg.f64 (.f64 (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64))))
(+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))
(+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))
(+.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(-.f64 (.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) phi1)) #s(literal 2 binary64)) (.f64 (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64)))
(fma.f64 (sin.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))
(fma.f64 (sin.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))
(fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64) (neg.f64 (.f64 (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64))))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))
(fma.f64 (.f64 (sin.f64 phi1) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))
(fma.f64 (.f64 (sin.f64 phi1) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi1)) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(neg.f64 (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1))))
(/.f64 (sin.f64 phi1) (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) phi1)) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) phi1)) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (sin.f64 phi1) (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64))) (sin.f64 phi1))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)))) (sin.f64 phi1))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))))) #s(literal -2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(/.f64 (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(/.f64 (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64))))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(/.f64 (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64)))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(/.f64 (.f64 (sin.f64 phi1) (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64))))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64))) (sin.f64 phi1)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(/.f64 (.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)))) (sin.f64 phi1)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(/.f64 (-.f64 (.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))))) #s(literal 4 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) phi1)) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64))) (sin.f64 phi1))) (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(/.f64 (neg.f64 (.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)))) (sin.f64 phi1))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))) (fma.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (-.f64 (.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))))))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1))) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (.f64 (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64)) (fma.f64 (.f64 (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))
(/.f64 (-.f64 (.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))) (-.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (.f64 (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)))) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1))) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1/2 binary64))))
(pow.f64 (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal -1 binary64))
(.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))
(.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))) #s(literal 1/2 binary64))
(.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) phi1)) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))) #s(literal 1/2 binary64))
(.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))
(.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))) #s(literal -1/2 binary64))
(.f64 (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(.f64 (.f64 (sin.f64 phi1) (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))
(.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64))) (sin.f64 phi1)) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(.f64 (.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)))) (sin.f64 phi1)) (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))
(+.f64 (.f64 (cos.f64 (-.f64 theta delta)) #s(literal 1/2 binary64)) (neg.f64 (.f64 (cos.f64 (+.f64 delta theta)) #s(literal 1/2 binary64))))
(-.f64 (.f64 (cos.f64 (-.f64 theta delta)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 delta theta)) #s(literal 1/2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 delta theta)) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (-.f64 theta delta)) #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (+.f64 delta theta)) #s(literal 1/2 binary64))))
(neg.f64 (/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal -2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(literal 1 binary64)))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal -2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta)))))
(/.f64 (-.f64 (.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (cos.f64 (+.f64 delta theta)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 theta delta)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (+.f64 delta theta)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 theta delta)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (-.f64 theta delta)) #s(literal 1/2 binary64)) (fma.f64 (.f64 (cos.f64 (+.f64 delta theta)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 delta theta)) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 (-.f64 theta delta)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 delta theta)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 theta delta)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (-.f64 theta delta)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 (+.f64 delta theta)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 delta theta)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (-.f64 theta delta)) #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 delta theta)) #s(literal 1/2 binary64))))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(literal -1 binary64))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64))
(*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64))
(.f64 #s(literal 1 binary64) (.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal -1/2 binary64))

eval100.0ms (0.6%)

Memory: -5.7MiB live, 188.8MiB allocated
Compiler: Compiled 31 813 to 2 299 computations (92.8% saved)

prune313.0ms (1.9%)

Memory

4.5MiB live, 210.4MiB allocated

Pruning

20 alts after pruning (20 fresh and 0 done)

	Pruned	Kept	Total
New	606	20	626
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	607	20	627

Accuracy

99.9%

Counts

627 → 20

Alt Table

Click to see full alt table

Status	Accuracy	Program
	68.2%	(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1))
	99.7%	(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
	90.3%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))) #s(literal -1/2 binary64) (cos.f64 delta))))
▶	99.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))
▶	99.3%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))))
	99.4%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (sin.f64 delta) (cos.f64 theta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))))
	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))
	99.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))))
	99.4%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1))))))
▶	99.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))))
	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (/.f64 (+.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))) #s(literal 2 binary64))))))))
	89.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
	92.9%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
	94.3%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (cos.f64 phi1) (.f64 (cos.f64 delta) (sin.f64 phi1))))))))
	84.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) phi1))))))
	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))))))
	80.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
▶	79.3%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))))
▶	89.2%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	30.8%	#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))

Compiler

Compiled 2 232 to 918 computations (58.9% saved)

simplify389.0ms (2.4%)

Memory

6.9MiB live, 269.6MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	0	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))))
cost-diff	128	(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))
cost-diff	128	(neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
cost-diff	6592	(+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))
cost-diff	0	(*.f64 (sin.f64 theta) (sin.f64 delta))
cost-diff	0	(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
cost-diff	0	(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))
cost-diff	0	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))))
cost-diff	0	(*.f64 (sin.f64 theta) (sin.f64 delta))
cost-diff	0	(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
cost-diff	0	(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))
cost-diff	0	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))))
cost-diff	0	(*.f64 (sin.f64 theta) (sin.f64 delta))
cost-diff	0	(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
cost-diff	0	(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
cost-diff	0	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
cost-diff	0	(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
cost-diff	0	(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
cost-diff	0	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))
cost-diff	6848	(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))

Rules

13 256×	`lower-fma.f32`
13 246×	`lower-fma.f64`
2 604×	`lower-+.f32`
2 594×	`lower-+.f64`
2 394×	`lower-*.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	61	814
0	105	820
1	193	792
2	395	787
3	1079	779
4	2251	779
5	3260	779
6	3967	779
7	4689	779
8	5100	779
9	5513	779
10	6526	779
11	7825	779
0	8159	772

Stop Event

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

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1))
(neg.f64 (sin.f64 phi1))
(sin.f64 phi1)
(cos.f64 delta)
(fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(cos.f64 theta)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
(cos.f64 delta)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))
(.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))
(fma.f64 delta (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))
(*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))
(cos.f64 theta)
(neg.f64 (sin.f64 phi1))
(sin.f64 phi1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))
(cos.f64 delta)
(.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(sin.f64 phi1)
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(cos.f64 theta)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta))
(neg.f64 (sin.f64 phi1))
(sin.f64 phi1)
(cos.f64 theta)
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))
(neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))
#s(literal 1/2 binary64)
(.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))
(cos.f64 (*.f64 #s(literal 2 binary64) phi1))
(*.f64 #s(literal 2 binary64) phi1)
#s(literal 2 binary64)
(cos.f64 delta)

Outputs
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta))
(*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)))
(neg.f64 (sin.f64 phi1))
(sin.f64 phi1)
(cos.f64 delta)
(fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta))) (cos.f64 delta))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(cos.f64 theta)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
(atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
(cos.f64 delta)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (*.f64 delta (sin.f64 phi1))))))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (*.f64 delta (sin.f64 phi1)))))))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (*.f64 delta (sin.f64 phi1))))))
(.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))
(.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (*.f64 delta (sin.f64 phi1)))))
(fma.f64 delta (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))
(-.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (.f64 delta (sin.f64 phi1))))
(*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta))
(cos.f64 theta)
(neg.f64 (sin.f64 phi1))
(sin.f64 phi1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta))
(cos.f64 delta)
(.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))
(.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(sin.f64 phi1)
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(cos.f64 theta)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)))))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))
(atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta))))))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)))))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta))
(neg.f64 (sin.f64 phi1))
(sin.f64 phi1)
(cos.f64 theta)
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))
(.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))
(.f64 (cos.f64 delta) (fma.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))
(fma.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))
(.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))
(cos.f64 (*.f64 #s(literal 2 binary64) phi1))
(cos.f64 (*.f64 phi1 #s(literal 2 binary64)))
(*.f64 #s(literal 2 binary64) phi1)
(*.f64 phi1 #s(literal 2 binary64))
#s(literal 2 binary64)
(cos.f64 delta)

localize496.0ms (3%)

Memory

-2.2MiB live, 509.3MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.19921875	(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy	0.24219257867903557	(cos.f64 (*.f64 #s(literal 2 binary64) phi1))
accuracy	0.6392905507894374	(+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))
accuracy	16.487817188594615	(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))
accuracy	0.19921875	(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy	0.23275375976844204	(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))
accuracy	0.26791000976844204	(.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))
accuracy	0.47007243369843144	(-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))
accuracy	0.171875	(*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))
accuracy	0.19921875	(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy	0.224941259768442	(.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))
accuracy	29.224371263353227	#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))
accuracy	0.13738251953688402	(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
accuracy	0.15234375	(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
accuracy	0.19921875	(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy	25.822557653006072	#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
accuracy	0.19921875	(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy	0.23275375976844204	(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))
accuracy	0.26400375976844204	(*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1))
accuracy	0.48832514747834616	(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))

Samples

214.0ms	82×	2	valid
79.0ms	128×	0	valid
53.0ms	46×	1	valid

Compiler

Compiled 782 to 58 computations (92.6% saved)

Precisions

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

ival-cos: 83.0ms (31% of total)

adjust: 57.0ms (21.3% of total)

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

ival-sin: 32.0ms (12% of total)

ival-add: 21.0ms (7.8% of total)

ival-atan2: 12.0ms (4.5% of total)

ival-asin: 6.0ms (2.2% of total)

ival-sub: 5.0ms (1.9% of total)

ival-neg: 3.0ms (1.1% of total)

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

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

exact: 0.0ms (0% of total)

series97.0ms (0.6%)

Memory

15.4MiB live, 170.9MiB allocated

Counts

24 → 804

Calls

Call 1

Inputs
#s(alt (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())
#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())
#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) #<representation binary64>) () ())
#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())
#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())
#s(alt (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())
#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) #<representation binary64>) () ())
#s(alt (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())
#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())
#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) #<representation binary64>) () ())
#s(alt (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) (patch (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) #<representation binary64>) () ())
#s(alt (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (patch (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())
#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #<representation binary64>) () ())
#s(alt (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #<representation binary64>) () ())
#s(alt (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (patch (cos.f64 (.f64 #s(literal 2 binary64) phi1)) #<representation binary64>) () ())

Outputs
#s(alt (cos delta) (taylor 0 phi1) (#s(alt (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta)))))) (taylor 0 phi1) (#s(alt (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (+ (* -1 (cos delta)) (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))))))) (taylor 0 phi1) (#s(alt (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf phi1) (#s(alt (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf phi1) (#s(alt (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf phi1) (#s(alt (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf phi1) (#s(alt (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf phi1) (#s(alt (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf phi1) (#s(alt (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf phi1) (#s(alt (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf phi1) (#s(alt (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (pow (sin phi1) 2))) (taylor 0 delta) (#s(alt (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* -1 (pow (sin phi1) 2)))) (taylor 0 delta) (#s(alt (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (* 1/2 (pow (sin phi1) 2)) 1/2)))))) (taylor 0 delta) (#s(alt (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (+ (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/2 (pow (sin phi1) 2))) 1/2)))))) (taylor 0 delta) (#s(alt (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf delta) (#s(alt (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf delta) (#s(alt (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf delta) (#s(alt (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf delta) (#s(alt (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf delta) (#s(alt (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf delta) (#s(alt (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf delta) (#s(alt (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf delta) (#s(alt (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))))) (taylor 0 theta) (#s(alt (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))))) (taylor 0 theta) (#s(alt (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))))) (taylor 0 theta) (#s(alt (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf theta) (#s(alt (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf theta) (#s(alt (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf theta) (#s(alt (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor inf theta) (#s(alt (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf theta) (#s(alt (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf theta) (#s(alt (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf theta) (#s(alt (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor -inf theta) (#s(alt (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (patch (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta)))) (taylor 0 theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta)))))))) (taylor 0 theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta))))))))) (taylor 0 theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (sin theta))) (taylor 0 delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta)))) (taylor 0 delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta)))))))) (taylor 0 delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta))))))))) (taylor 0 delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor 0 phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta))) (taylor 0 phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta))))))) (taylor 0 phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta)))))))) (taylor 0 phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta))))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta)))))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor 0 delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta))))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta))))))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta)))))))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (pow phi1 2) (cos delta)))) (taylor 0 phi1) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta)))) (taylor 0 phi1) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta)))) (taylor 0 phi1) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor 0 delta) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1 (* (pow delta 2) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* 1/2 (cos (* 2 phi1))))) (taylor 0 delta) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- 1/24 (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))))) (taylor 0 delta) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- (+ 1/24 (* -1 (* (pow delta 2) (+ 1/720 (* -1/720 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))) (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))))) (taylor 0 delta) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) (patch (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow phi1 2) (cos delta))) (taylor 0 phi1) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta))) (taylor 0 phi1) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta))) (taylor 0 phi1) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (- (* (pow phi1 2) (- (* (pow phi1 2) (- (* 1/315 (* (pow phi1 2) (cos delta))) (* 2/45 (cos delta)))) (* -1/3 (cos delta)))) (cos delta))) (taylor 0 phi1) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (cos (* 2 phi1))) 1/2) (taylor 0 delta) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 phi1))) (* 1/2 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) 1/2) (taylor 0 delta) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* -1/24 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) 1/2) (taylor 0 delta) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- (* 1/720 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) 1/2) (taylor 0 delta) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (patch (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (pow phi1 2) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2)))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3)))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3)))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (patch (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow phi1 2)) (taylor 0 phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)) (taylor 0 phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)) (taylor 0 phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* (pow phi1 2) (- (* 1/315 (pow phi1 2)) 2/45)))) 1)) (taylor 0 phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow (sin phi1) 2)) (taylor inf phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow (sin phi1) 2)) (taylor inf phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow (sin phi1) 2)) (taylor inf phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow (sin phi1) 2)) (taylor inf phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow (sin phi1) 2)) (taylor -inf phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow (sin phi1) 2)) (taylor -inf phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow (sin phi1) 2)) (taylor -inf phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow (sin phi1) 2)) (taylor -inf phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (sin delta)) (taylor 0 phi1) (#s(alt (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* 1/24 (* (pow phi1 2) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* 1/24 (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor inf phi1) (#s(alt (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor inf phi1) (#s(alt (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor inf phi1) (#s(alt (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor inf phi1) (#s(alt (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor -inf phi1) (#s(alt (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor -inf phi1) (#s(alt (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor -inf phi1) (#s(alt (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor -inf phi1) (#s(alt (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (cos theta))) (taylor 0 delta) (#s(alt (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (cos theta)))) (* (cos phi1) (cos theta)))) (taylor 0 delta) (#s(alt (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (cos theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (cos theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (cos theta)))))))) (taylor 0 delta) (#s(alt (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (cos theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (cos theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (cos theta)))) (* 1/120 (* (cos phi1) (cos theta))))))))) (taylor 0 delta) (#s(alt (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor inf delta) (#s(alt (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor inf delta) (#s(alt (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor inf delta) (#s(alt (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor inf delta) (#s(alt (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor -inf delta) (#s(alt (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor -inf delta) (#s(alt (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor -inf delta) (#s(alt (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor -inf delta) (#s(alt (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor 0 theta) (#s(alt (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin delta))))))) (taylor 0 theta) (#s(alt (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/24 (* (cos phi1) (sin delta)))))))) (taylor 0 theta) (#s(alt (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor inf theta) (#s(alt (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor inf theta) (#s(alt (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor inf theta) (#s(alt (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor inf theta) (#s(alt (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor -inf theta) (#s(alt (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor -inf theta) (#s(alt (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor -inf theta) (#s(alt (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (sin delta))) (taylor -inf theta) (#s(alt (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 phi1) (#s(alt (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) (patch (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (* delta (* phi1 (cos theta))))) (taylor 0 phi1) (#s(alt (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) (patch (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* phi1 (+ (* -1 phi1) (* -1 (* delta (cos theta)))))) (taylor 0 phi1) (#s(alt (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) (patch (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* phi1 (+ (* -1 (* delta (cos theta))) (* phi1 (- (* phi1 (+ (* 1/6 (* delta (cos theta))) (* 1/2 (* delta (cos theta))))) 1))))) (taylor 0 phi1) (#s(alt (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) (patch (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1)))))) (taylor inf phi1) (#s(alt (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) (patch (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1)))))) (taylor inf phi1) (#s(alt (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) (patch (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1)))))) (taylor inf phi1) (#s(alt (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) (patch (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1)))))) (taylor inf phi1) (#s(alt (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) (patch (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) (patch (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) (patch (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) (patch (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) (patch (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (pow (cos phi1) 2) (taylor 0 delta) (#s(alt (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) (patch (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (cos phi1) 2)) (taylor 0 delta) (#s(alt (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) (patch (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (cos phi1) 2)) (taylor 0 delta) (#s(alt (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) (patch (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (cos phi1) 2)) (taylor 0 delta) (#s(alt (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) (patch (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (taylor inf delta) (#s(alt (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) (patch (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (/ (pow (cos phi1) 2) delta))) (taylor inf delta) (#s(alt (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) (patch (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (/ (pow (cos phi1) 2) delta))) (taylor inf delta) (#s(alt (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) (patch (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (/ (pow (cos phi1) 2) delta))) (taylor inf delta) (#s(alt (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) (patch (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (taylor -inf delta) (#s(alt (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) (patch (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* delta (+ (* -1 (/ (pow (cos phi1) 2) delta)) (* (cos phi1) (* (cos theta) (sin phi1)))))) (taylor -inf delta) (#s(alt (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) (patch (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* delta (+ (* -1 (/ (pow (cos phi1) 2) delta)) (* (cos phi1) (* (cos theta) (sin phi1)))))) (taylor -inf delta) (#s(alt (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) (patch (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* delta (+ (* -1 (/ (pow (cos phi1) 2) delta)) (* (cos phi1) (* (cos theta) (sin phi1)))))) (taylor -inf delta) (#s(alt (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) (patch (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (+ (cos phi1) (* -1 (* delta (sin phi1))))) (taylor 0 theta) (#s(alt (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) (patch (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))) (* (cos phi1) (+ (cos phi1) (* -1 (* delta (sin phi1)))))) (taylor 0 theta) (#s(alt (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) (patch (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (+ (cos phi1) (* -1 (* delta (sin phi1))))) (* (pow theta 2) (+ (* -1/24 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))) (* 1/2 (* delta (* (cos phi1) (sin phi1))))))) (taylor 0 theta) (#s(alt (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) (patch (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (+ (cos phi1) (* -1 (* delta (sin phi1))))) (* (pow theta 2) (+ (* 1/2 (* delta (* (cos phi1) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* delta (* (cos phi1) (sin phi1)))) (* 1/720 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1)))))))))) (taylor 0 theta) (#s(alt (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) (patch (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1)))))) (taylor inf theta) (#s(alt (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) (patch (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1)))))) (taylor inf theta) (#s(alt (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) (patch (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1)))))) (taylor inf theta) (#s(alt (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) (patch (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1)))))) (taylor inf theta) (#s(alt (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) (patch (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1)))))) (taylor -inf theta) (#s(alt (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) (patch (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1)))))) (taylor -inf theta) (#s(alt (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) (patch (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1)))))) (taylor -inf theta) (#s(alt (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) (patch (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1)))))) (taylor -inf theta) (#s(alt (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) (patch (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (sin phi1)) (taylor 0 theta) (#s(alt (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (patch (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (sin phi1)) (* 1/2 (* (pow theta 2) (sin phi1)))) (taylor 0 theta) (#s(alt (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (patch (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (sin phi1)) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (sin phi1))) (* 1/2 (sin phi1))))) (taylor 0 theta) (#s(alt (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (patch (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (sin phi1)) (* (pow theta 2) (+ (* 1/2 (sin phi1)) (* (pow theta 2) (+ (* -1/24 (sin phi1)) (* 1/720 (* (pow theta 2) (sin phi1)))))))) (taylor 0 theta) (#s(alt (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (patch (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos theta) (sin phi1))) (taylor inf theta) (#s(alt (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (patch (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos theta) (sin phi1))) (taylor inf theta) (#s(alt (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (patch (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos theta) (sin phi1))) (taylor inf theta) (#s(alt (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (patch (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos theta) (sin phi1))) (taylor inf theta) (#s(alt (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (patch (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos theta) (sin phi1))) (taylor -inf theta) (#s(alt (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (patch (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos theta) (sin phi1))) (taylor -inf theta) (#s(alt (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (patch (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos theta) (sin phi1))) (taylor -inf theta) (#s(alt (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (patch (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos theta) (sin phi1))) (taylor -inf theta) (#s(alt (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (patch (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (cos theta))) (taylor 0 phi1) (#s(alt (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (patch (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (cos theta)) (* 1/6 (* (pow phi1 2) (cos theta))))) (taylor 0 phi1) (#s(alt (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (patch (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1/120 (* (pow phi1 2) (cos theta))) (* 1/6 (cos theta)))))) (taylor 0 phi1) (#s(alt (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (patch (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* 1/6 (cos theta)) (* (pow phi1 2) (+ (* -1/120 (cos theta)) (* 1/5040 (* (pow phi1 2) (cos theta))))))))) (taylor 0 phi1) (#s(alt (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (patch (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos theta) (sin phi1))) (taylor inf phi1) (#s(alt (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (patch (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos theta) (sin phi1))) (taylor inf phi1) (#s(alt (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (patch (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos theta) (sin phi1))) (taylor inf phi1) (#s(alt (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (patch (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos theta) (sin phi1))) (taylor inf phi1) (#s(alt (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (patch (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos theta) (sin phi1))) (taylor -inf phi1) (#s(alt (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (patch (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos theta) (sin phi1))) (taylor -inf phi1) (#s(alt (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (patch (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos theta) (sin phi1))) (taylor -inf phi1) (#s(alt (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (patch (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos theta) (sin phi1))) (taylor -inf phi1) (#s(alt (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (patch (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))) (taylor 0 phi1) (#s(alt (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta)))) (taylor 0 phi1) (#s(alt (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/3 (* phi1 (cos delta))) (* -1/6 (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta)))) (taylor 0 phi1) (#s(alt (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor 0 delta) (#s(alt (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* delta (+ (* -1/2 (* delta (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* delta (+ (* delta (+ (* -1/2 (pow (sin phi1) 2)) (* -1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (taylor 0 theta) (#s(alt (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1))))))))) (taylor 0 theta) (#s(alt (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 phi1) (#s(alt (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (patch (cos.f64 (.f64 #s(literal 2 binary64) phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -2 (pow phi1 2))) (taylor 0 phi1) (#s(alt (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (patch (cos.f64 (.f64 #s(literal 2 binary64) phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi1 2) (- (* 2/3 (pow phi1 2)) 2))) (taylor 0 phi1) (#s(alt (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (patch (cos.f64 (.f64 #s(literal 2 binary64) phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/3 (* -4/45 (pow phi1 2)))) 2))) (taylor 0 phi1) (#s(alt (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (patch (cos.f64 (.f64 #s(literal 2 binary64) phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 phi1)) (taylor inf phi1) (#s(alt (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (patch (cos.f64 (.f64 #s(literal 2 binary64) phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 phi1)) (taylor inf phi1) (#s(alt (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (patch (cos.f64 (.f64 #s(literal 2 binary64) phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 phi1)) (taylor inf phi1) (#s(alt (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (patch (cos.f64 (.f64 #s(literal 2 binary64) phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 phi1)) (taylor inf phi1) (#s(alt (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (patch (cos.f64 (.f64 #s(literal 2 binary64) phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 phi1)) (taylor -inf phi1) (#s(alt (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (patch (cos.f64 (.f64 #s(literal 2 binary64) phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 phi1)) (taylor -inf phi1) (#s(alt (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (patch (cos.f64 (.f64 #s(literal 2 binary64) phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 phi1)) (taylor -inf phi1) (#s(alt (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (patch (cos.f64 (.f64 #s(literal 2 binary64) phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 phi1)) (taylor -inf phi1) (#s(alt (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (patch (cos.f64 (.f64 #s(literal 2 binary64) phi1)) #<representation binary64>) () ())) ())

Calls

201 calls:

Time	Variable		Point	Expression
6.0ms	phi1	@	-inf	(+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))
5.0ms	theta	@	0	(* (cos phi1) (* (sin delta) (cos theta)))
2.0ms	phi1	@	inf	(+ (* (* (neg (sin phi1)) (sin phi1)) (cos delta)) (+ (* (* (cos phi1) (* (sin delta) (cos theta))) (neg (sin phi1))) (cos delta)))
2.0ms	phi1	@	-inf	(+ (* (* (neg (sin phi1)) (sin phi1)) (cos delta)) (+ (* (* (cos phi1) (* (sin delta) (cos theta))) (neg (sin phi1))) (cos delta)))
2.0ms	delta	@	inf	(+ (* (* (neg (sin phi1)) (sin phi1)) (cos delta)) (+ (* (* (cos phi1) (* (sin delta) (cos theta))) (neg (sin phi1))) (cos delta)))

simplify481.0ms (2.9%)

Memory

-2.0MiB live, 593.7MiB allocated

Algorithm

1×	egg-herbie

Rules

16 426×	`lower-fma.f64`
16 426×	`lower-fma.f32`
8 032×	`lower-*.f64`
8 032×	`lower-*.f32`
3 598×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	578	20561
1	1927	18305
2	6501	17724
0	8303	17385

Stop Event

1×	iter limit
1×	node limit

Counts

804 → 794

Calls

Call 1

Inputs
(cos delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))
(+ (cos delta) (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (+ (* -1 (cos delta)) (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ 1 (* -1 (pow (sin phi1) 2)))
(+ 1 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* -1 (pow (sin phi1) 2))))
(+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (* 1/2 (pow (sin phi1) 2)) 1/2))))))
(+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (+ (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/2 (pow (sin phi1) 2))) 1/2))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (sin delta) (sin phi1))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(* theta (* (cos phi1) (sin delta)))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* delta (* (cos phi1) (sin theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (sin delta) (sin theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(* theta (sin delta))
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* delta (sin theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(cos delta)
(+ (cos delta) (* -1 (* (pow phi1 2) (cos delta))))
(+ (cos delta) (* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta))))
(+ (cos delta) (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (+ (* -1 (* (pow delta 2) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* 1/2 (cos (* 2 phi1)))))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- 1/24 (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- (+ 1/24 (* -1 (* (pow delta 2) (+ 1/720 (* -1/720 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))) (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (pow phi1 2) (cos delta)))
(* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta)))
(* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta)))
(* (pow phi1 2) (- (* (pow phi1 2) (- (* (pow phi1 2) (- (* 1/315 (* (pow phi1 2) (cos delta))) (* 2/45 (cos delta)))) (* -1/3 (cos delta)))) (cos delta)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (* 1/2 (cos (* 2 phi1))) 1/2)
(- (+ (* 1/2 (cos (* 2 phi1))) (* 1/2 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) 1/2)
(- (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* -1/24 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) 1/2)
(- (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- (* 1/720 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) 1/2)
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(pow phi1 2)
(* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(* -1 (pow phi1 2))
(* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1))
(* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1))
(* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* (pow phi1 2) (- (* 1/315 (pow phi1 2)) 2/45)))) 1))
(* -1 (pow (sin phi1) 2))
(* -1 (pow (sin phi1) 2))
(* -1 (pow (sin phi1) 2))
(* -1 (pow (sin phi1) 2))
(* -1 (pow (sin phi1) 2))
(* -1 (pow (sin phi1) 2))
(* -1 (pow (sin phi1) 2))
(* -1 (pow (sin phi1) 2))
(* (cos theta) (sin delta))
(+ (* -1/2 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* (cos theta) (sin delta)))
(+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* 1/24 (* (pow phi1 2) (* (cos theta) (sin delta)))))))
(+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* 1/24 (* (cos theta) (sin delta))))))))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* delta (* (cos phi1) (cos theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (cos theta)))) (* (cos phi1) (cos theta))))
(* delta (+ (* (cos phi1) (cos theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (cos theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (cos theta))))))))
(* delta (+ (* (cos phi1) (cos theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (cos theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (cos theta)))) (* 1/120 (* (cos phi1) (cos theta)))))))))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (sin delta))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta)))
(+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin delta)))))))
(+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/24 (* (cos phi1) (sin delta))))))))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(- 1 (pow (sin phi1) 2))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(cos delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- 1 (pow (sin phi1) 2))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(cos delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
1
(+ 1 (* -1 (* delta (* phi1 (cos theta)))))
(+ 1 (* phi1 (+ (* -1 phi1) (* -1 (* delta (cos theta))))))
(+ 1 (* phi1 (+ (* -1 (* delta (cos theta))) (* phi1 (- (* phi1 (+ (* 1/6 (* delta (cos theta))) (* 1/2 (* delta (cos theta))))) 1)))))
(* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1))))))
(* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1))))))
(* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1))))))
(* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1))))))
(* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1))))))
(* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1))))))
(* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1))))))
(* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1))))))
(pow (cos phi1) 2)
(+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (cos phi1) 2))
(+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (cos phi1) 2))
(+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (cos phi1) 2))
(* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))
(* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (/ (pow (cos phi1) 2) delta)))
(* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (/ (pow (cos phi1) 2) delta)))
(* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (/ (pow (cos phi1) 2) delta)))
(* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))
(* -1 (* delta (+ (* -1 (/ (pow (cos phi1) 2) delta)) (* (cos phi1) (* (cos theta) (sin phi1))))))
(* -1 (* delta (+ (* -1 (/ (pow (cos phi1) 2) delta)) (* (cos phi1) (* (cos theta) (sin phi1))))))
(* -1 (* delta (+ (* -1 (/ (pow (cos phi1) 2) delta)) (* (cos phi1) (* (cos theta) (sin phi1))))))
(* (cos phi1) (+ (cos phi1) (* -1 (* delta (sin phi1)))))
(+ (* 1/2 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))) (* (cos phi1) (+ (cos phi1) (* -1 (* delta (sin phi1))))))
(+ (* (cos phi1) (+ (cos phi1) (* -1 (* delta (sin phi1))))) (* (pow theta 2) (+ (* -1/24 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))) (* 1/2 (* delta (* (cos phi1) (sin phi1)))))))
(+ (* (cos phi1) (+ (cos phi1) (* -1 (* delta (sin phi1))))) (* (pow theta 2) (+ (* 1/2 (* delta (* (cos phi1) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* delta (* (cos phi1) (sin phi1)))) (* 1/720 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))))))))
(* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1))))))
(* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1))))))
(* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1))))))
(* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1))))))
(* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1))))))
(* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1))))))
(* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1))))))
(* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1))))))
(* -1 (sin phi1))
(+ (* -1 (sin phi1)) (* 1/2 (* (pow theta 2) (sin phi1))))
(+ (* -1 (sin phi1)) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (sin phi1))) (* 1/2 (sin phi1)))))
(+ (* -1 (sin phi1)) (* (pow theta 2) (+ (* 1/2 (sin phi1)) (* (pow theta 2) (+ (* -1/24 (sin phi1)) (* 1/720 (* (pow theta 2) (sin phi1))))))))
(* -1 (* (cos theta) (sin phi1)))
(* -1 (* (cos theta) (sin phi1)))
(* -1 (* (cos theta) (sin phi1)))
(* -1 (* (cos theta) (sin phi1)))
(* -1 (* (cos theta) (sin phi1)))
(* -1 (* (cos theta) (sin phi1)))
(* -1 (* (cos theta) (sin phi1)))
(* -1 (* (cos theta) (sin phi1)))
(* -1 (* phi1 (cos theta)))
(* phi1 (+ (* -1 (cos theta)) (* 1/6 (* (pow phi1 2) (cos theta)))))
(* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1/120 (* (pow phi1 2) (cos theta))) (* 1/6 (cos theta))))))
(* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* 1/6 (cos theta)) (* (pow phi1 2) (+ (* -1/120 (cos theta)) (* 1/5040 (* (pow phi1 2) (cos theta)))))))))
(* -1 (* (cos theta) (sin phi1)))
(* -1 (* (cos theta) (sin phi1)))
(* -1 (* (cos theta) (sin phi1)))
(* -1 (* (cos theta) (sin phi1)))
(* -1 (* (cos theta) (sin phi1)))
(* -1 (* (cos theta) (sin phi1)))
(* -1 (* (cos theta) (sin phi1)))
(* -1 (* (cos theta) (sin phi1)))
(- 1 (pow (sin phi1) 2))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(cos delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/3 (* phi1 (cos delta))) (* -1/6 (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(pow (sin phi1) 2)
(+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))
(+ (* delta (+ (* -1/2 (* delta (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(+ (* delta (+ (* delta (+ (* -1/2 (pow (sin phi1) 2)) (* -1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))
(+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
1
(+ 1 (* -2 (pow phi1 2)))
(+ 1 (* (pow phi1 2) (- (* 2/3 (pow phi1 2)) 2)))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/3 (* -4/45 (pow phi1 2)))) 2)))
(cos (* 2 phi1))
(cos (* 2 phi1))
(cos (* 2 phi1))
(cos (* 2 phi1))
(cos (* 2 phi1))
(cos (* 2 phi1))
(cos (* 2 phi1))
(cos (* 2 phi1))

Outputs
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 phi1 (sin.f64 delta))))
(+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))
(-.f64 (.f64 (fma.f64 phi1 (neg.f64 phi1) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))
(+ (cos delta) (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (+ (* -1 (cos delta)) (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))))))
(fma.f64 phi1 (neg.f64 (fma.f64 phi1 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 #s(literal -2/3 binary64) phi1) (cos.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 delta)))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(+ 1 (* -1 (pow (sin phi1) 2)))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(+ 1 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* -1 (pow (sin phi1) 2))))
(.f64 (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (neg.f64 (.f64 delta (cos.f64 theta))) (cos.f64 phi1)))
(+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (* 1/2 (pow (sin phi1) 2)) 1/2))))))
(fma.f64 (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (neg.f64 (.f64 delta (cos.f64 theta))) (cos.f64 phi1)) (.f64 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (*.f64 delta delta)))
(+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (+ (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/2 (pow (sin phi1) 2))) 1/2))))))
(fma.f64 (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (neg.f64 (.f64 delta (cos.f64 theta))) (cos.f64 phi1)) (.f64 (fma.f64 (sin.f64 phi1) (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) delta) (.f64 (cos.f64 theta) (cos.f64 phi1))) (.f64 #s(literal -1/2 binary64) (sin.f64 phi1))) #s(literal -1/2 binary64)) (*.f64 delta delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (sin delta) (sin phi1))))))
(-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))
(fma.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (.f64 theta theta) #s(literal -1 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (fma.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))) (.f64 (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))) (.f64 theta theta)) (fma.f64 #s(literal -1/24 binary64) (*.f64 theta theta) #s(literal 1/2 binary64)))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))))))
(fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (fma.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (.f64 theta theta) #s(literal -1 binary64)) (.f64 (.f64 theta theta) (.f64 (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))) (.f64 theta theta)) (fma.f64 #s(literal 1/720 binary64) (*.f64 theta theta) #s(literal -1/24 binary64))))))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)) 1)))
(neg.f64 (.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)) 1)))
(neg.f64 (.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) lambda1)) 1)))
(neg.f64 (.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) lambda1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (+ (* -1 (* (cos delta) (pow (sin phi1) 2))) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(* theta (* (cos phi1) (sin delta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) theta))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(.f64 theta (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(.f64 theta (fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (.f64 theta theta))) (fma.f64 #s(literal 1/120 binary64) (.f64 theta theta) #s(literal -1/6 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(.f64 theta (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (.f64 theta theta) (.f64 (.f64 theta theta) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal -1/5040 binary64) (.f64 theta theta) #s(literal 1/120 binary64)))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* delta (* (cos phi1) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 delta (sin.f64 theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (.f64 delta (sin.f64 theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(.f64 delta (fma.f64 (cos.f64 phi1) (sin.f64 theta) (.f64 (.f64 (.f64 delta (.f64 delta (cos.f64 phi1))) (sin.f64 theta)) (fma.f64 #s(literal 1/120 binary64) (.f64 delta delta) #s(literal -1/6 binary64)))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(.f64 delta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 theta)) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta delta) #s(literal 1/120 binary64))) (.f64 (.f64 delta delta) (.f64 delta delta)))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(fma.f64 (.f64 phi1 phi1) (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1) #s(literal -1/2 binary64))) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64))) (.f64 (.f64 phi1 phi1) (*.f64 phi1 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(neg.f64 (.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(neg.f64 (.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(neg.f64 (.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) lambda1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(.f64 theta (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (sin.f64 delta)))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(.f64 theta (fma.f64 (.f64 theta theta) (.f64 (sin.f64 delta) (fma.f64 #s(literal 1/120 binary64) (.f64 theta theta) #s(literal -1/6 binary64))) (sin.f64 delta)))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(.f64 theta (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (sin.f64 delta) (.f64 (.f64 theta theta) (.f64 (.f64 (sin.f64 delta) (.f64 theta theta)) (fma.f64 #s(literal -1/5040 binary64) (.f64 theta theta) #s(literal 1/120 binary64))))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (*.f64 delta (sin.f64 theta)))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(.f64 delta (fma.f64 (.f64 delta delta) (.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (.f64 delta delta) #s(literal -1/6 binary64))) (sin.f64 theta)))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(.f64 delta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta) (.f64 (.f64 delta delta) (.f64 (.f64 (sin.f64 theta) (.f64 delta delta)) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta delta) #s(literal 1/120 binary64))))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(neg.f64 (.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(neg.f64 (.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(neg.f64 (.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) lambda1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(neg.f64 (.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(neg.f64 (.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(neg.f64 (.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) lambda1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* (pow phi1 2) (cos delta))))
(*.f64 (fma.f64 phi1 (neg.f64 phi1) #s(literal 1 binary64)) (cos.f64 delta))
(+ (cos delta) (* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta))))
(fma.f64 (.f64 phi1 phi1) (.f64 (cos.f64 delta) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/3 binary64) #s(literal -1 binary64))) (cos.f64 delta))
(+ (cos delta) (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta))))
(fma.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (.f64 (cos.f64 delta) (fma.f64 (.f64 phi1 phi1) #s(literal -2/45 binary64) #s(literal 1/3 binary64))) (neg.f64 (cos.f64 delta))) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1 (* (pow delta 2) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* 1/2 (cos (* 2 phi1)))))
(fma.f64 (.f64 delta delta) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- 1/24 (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))))
(fma.f64 (.f64 delta delta) (fma.f64 (.f64 delta delta) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 1/24 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- (+ 1/24 (* -1 (* (pow delta 2) (+ 1/720 (* -1/720 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))) (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))))
(fma.f64 (.f64 delta delta) (fma.f64 (.f64 delta delta) (fma.f64 (fma.f64 #s(literal -1/720 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 1/720 binary64)) (neg.f64 (.f64 delta delta)) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 1/24 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(* -1 (* (pow phi1 2) (cos delta)))
(.f64 (cos.f64 delta) (neg.f64 (.f64 phi1 phi1)))
(* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta)))
(.f64 (.f64 phi1 phi1) (.f64 (cos.f64 delta) (fma.f64 (.f64 phi1 phi1) #s(literal 1/3 binary64) #s(literal -1 binary64))))
(* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta)))
(.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (.f64 (cos.f64 delta) (fma.f64 (*.f64 phi1 phi1) #s(literal -2/45 binary64) #s(literal 1/3 binary64))) (neg.f64 (cos.f64 delta))))
(* (pow phi1 2) (- (* (pow phi1 2) (- (* (pow phi1 2) (- (* 1/315 (* (pow phi1 2) (cos delta))) (* 2/45 (cos delta)))) (* -1/3 (cos delta)))) (cos delta)))
(.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (.f64 (cos.f64 delta) (fma.f64 (.f64 phi1 phi1) #s(literal 1/315 binary64) #s(literal -2/45 binary64))) (*.f64 (cos.f64 delta) #s(literal 1/3 binary64))) (neg.f64 (cos.f64 delta))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))
(- (* 1/2 (cos (* 2 phi1))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))
(- (+ (* 1/2 (cos (* 2 phi1))) (* 1/2 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 delta delta) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal -1/2 binary64))
(- (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* -1/24 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) 1/2)
(fma.f64 (.f64 delta delta) (.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/24 binary64) (.f64 delta delta) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(- (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- (* 1/720 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) 1/2)
(fma.f64 (.f64 delta delta) (fma.f64 (.f64 delta delta) (.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/720 binary64) (.f64 delta delta) #s(literal -1/24 binary64))) (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))
(pow phi1 2)
(*.f64 phi1 phi1)
(* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))
(.f64 phi1 (fma.f64 phi1 (.f64 (*.f64 phi1 phi1) #s(literal -1/3 binary64)) phi1))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))
(.f64 (.f64 (fma.f64 (.f64 phi1 phi1) (fma.f64 phi1 (.f64 phi1 #s(literal 2/45 binary64)) #s(literal -1/3 binary64)) #s(literal 1 binary64)) phi1) phi1)
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))
(.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/315 binary64) #s(literal 2/45 binary64)) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(neg.f64 (.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(neg.f64 (.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(neg.f64 (.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) lambda1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(* -1 (pow phi1 2))
(neg.f64 (*.f64 phi1 phi1))
(* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1))
(.f64 (.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/3 binary64) #s(literal -1 binary64)) phi1) phi1)
(* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1))
(.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -2/45 binary64) #s(literal 1/3 binary64)) #s(literal -1 binary64)))
(* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* (pow phi1 2) (- (* 1/315 (pow phi1 2)) 2/45)))) 1))
(.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/315 binary64) #s(literal -2/45 binary64)) #s(literal 1/3 binary64)) #s(literal -1 binary64)))
(* -1 (pow (sin phi1) 2))
(neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(* -1 (pow (sin phi1) 2))
(neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(* -1 (pow (sin phi1) 2))
(neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(* -1 (pow (sin phi1) 2))
(neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(* -1 (pow (sin phi1) 2))
(neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(* -1 (pow (sin phi1) 2))
(neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(* -1 (pow (sin phi1) 2))
(neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(* -1 (pow (sin phi1) 2))
(neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(* (cos theta) (sin delta))
(*.f64 (cos.f64 theta) (sin.f64 delta))
(+ (* -1/2 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* (cos theta) (sin delta)))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* 1/24 (* (pow phi1 2) (* (cos theta) (sin delta)))))))
(fma.f64 (.f64 (sin.f64 delta) (.f64 phi1 (.f64 phi1 (cos.f64 theta)))) (fma.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* 1/24 (* (cos theta) (sin delta))))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64))) (.f64 (.f64 phi1 phi1) (*.f64 phi1 phi1))))
(* (cos phi1) (* (cos theta) (sin delta)))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin delta)))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin delta)))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin delta)))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin delta)))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin delta)))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin delta)))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin delta)))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(* delta (* (cos phi1) (cos theta)))
(.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (cos theta)))) (* (cos phi1) (cos theta))))
(.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)))
(* delta (+ (* (cos phi1) (cos theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (cos theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (cos theta))))))))
(.f64 delta (fma.f64 (.f64 delta delta) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (fma.f64 #s(literal 1/120 binary64) (.f64 delta delta) #s(literal -1/6 binary64))) (.f64 (cos.f64 theta) (cos.f64 phi1))))
(* delta (+ (* (cos phi1) (cos theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (cos theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (cos theta)))) (* 1/120 (* (cos phi1) (cos theta)))))))))
(.f64 delta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (cos.f64 theta) (cos.f64 phi1)) (.f64 (.f64 delta delta) (.f64 (.f64 (.f64 delta delta) (.f64 (cos.f64 theta) (cos.f64 phi1))) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta delta) #s(literal 1/120 binary64))))))
(* (cos phi1) (* (cos theta) (sin delta)))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin delta)))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin delta)))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin delta)))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin delta)))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin delta)))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin delta)))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin delta)))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(* (cos phi1) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta)))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 theta theta) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin delta)))))))
(fma.f64 (.f64 theta theta) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (.f64 theta theta) #s(literal -1/2 binary64))) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/24 (* (cos phi1) (sin delta))))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (.f64 theta theta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (.f64 theta theta))) (fma.f64 #s(literal -1/720 binary64) (*.f64 theta theta) #s(literal 1/24 binary64)))))
(* (cos phi1) (* (cos theta) (sin delta)))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin delta)))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin delta)))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin delta)))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin delta)))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin delta)))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin delta)))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(* (cos phi1) (* (cos theta) (sin delta)))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(- 1 (pow (sin phi1) 2))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(.f64 (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (neg.f64 (.f64 delta (cos.f64 theta))) (cos.f64 phi1)))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (neg.f64 (.f64 delta (cos.f64 theta))) (cos.f64 phi1)) (.f64 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (*.f64 delta delta)))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (neg.f64 (.f64 delta (cos.f64 theta))) (cos.f64 phi1)) (.f64 (fma.f64 (sin.f64 phi1) (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) delta) (.f64 (cos.f64 theta) (cos.f64 phi1))) (.f64 #s(literal -1/2 binary64) (sin.f64 phi1))) #s(literal -1/2 binary64)) (*.f64 delta delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 phi1 (sin.f64 delta))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(-.f64 (.f64 (fma.f64 phi1 (neg.f64 phi1) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 phi1 (neg.f64 (fma.f64 phi1 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 #s(literal -2/3 binary64) phi1) (cos.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 delta)))) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (.f64 theta theta) #s(literal -1 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (fma.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))) (.f64 (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))) (.f64 theta theta)) (fma.f64 #s(literal -1/24 binary64) (*.f64 theta theta) #s(literal 1/2 binary64)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (fma.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (.f64 theta theta) #s(literal -1 binary64)) (.f64 (.f64 theta theta) (.f64 (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))) (.f64 theta theta)) (fma.f64 #s(literal 1/720 binary64) (*.f64 theta theta) #s(literal -1/24 binary64))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- 1 (pow (sin phi1) 2))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(.f64 (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (neg.f64 (.f64 delta (cos.f64 theta))) (cos.f64 phi1)))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (neg.f64 (.f64 delta (cos.f64 theta))) (cos.f64 phi1)) (.f64 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (*.f64 delta delta)))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (neg.f64 (.f64 delta (cos.f64 theta))) (cos.f64 phi1)) (.f64 (fma.f64 (sin.f64 phi1) (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) delta) (.f64 (cos.f64 theta) (cos.f64 phi1))) (.f64 #s(literal -1/2 binary64) (sin.f64 phi1))) #s(literal -1/2 binary64)) (*.f64 delta delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 phi1 (sin.f64 delta))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(-.f64 (.f64 (fma.f64 phi1 (neg.f64 phi1) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 phi1 (neg.f64 (fma.f64 phi1 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 #s(literal -2/3 binary64) phi1) (cos.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 delta)))) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (.f64 theta theta) #s(literal -1 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (fma.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))) (.f64 (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))) (.f64 theta theta)) (fma.f64 #s(literal -1/24 binary64) (*.f64 theta theta) #s(literal 1/2 binary64)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (fma.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (.f64 theta theta) #s(literal -1 binary64)) (.f64 (.f64 theta theta) (.f64 (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))) (.f64 theta theta)) (fma.f64 #s(literal 1/720 binary64) (*.f64 theta theta) #s(literal -1/24 binary64))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
1
#s(literal 1 binary64)
(+ 1 (* -1 (* delta (* phi1 (cos theta)))))
(fma.f64 (cos.f64 theta) (*.f64 phi1 (neg.f64 delta)) #s(literal 1 binary64))
(+ 1 (* phi1 (+ (* -1 phi1) (* -1 (* delta (cos theta))))))
(fma.f64 (neg.f64 phi1) (fma.f64 delta (cos.f64 theta) phi1) #s(literal 1 binary64))
(+ 1 (* phi1 (+ (* -1 (* delta (cos theta))) (* phi1 (- (* phi1 (+ (* 1/6 (* delta (cos theta))) (* 1/2 (* delta (cos theta))))) 1)))))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 (.f64 delta (cos.f64 theta)) (.f64 #s(literal 2/3 binary64) phi1) #s(literal -1 binary64)) (neg.f64 (*.f64 delta (cos.f64 theta)))) #s(literal 1 binary64))
(* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1))))))
(.f64 (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (neg.f64 (.f64 delta (cos.f64 theta))) (cos.f64 phi1)))
(* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1))))))
(.f64 (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (neg.f64 (.f64 delta (cos.f64 theta))) (cos.f64 phi1)))
(* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1))))))
(.f64 (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (neg.f64 (.f64 delta (cos.f64 theta))) (cos.f64 phi1)))
(* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1))))))
(.f64 (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (neg.f64 (.f64 delta (cos.f64 theta))) (cos.f64 phi1)))
(* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1))))))
(.f64 (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (neg.f64 (.f64 delta (cos.f64 theta))) (cos.f64 phi1)))
(* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1))))))
(.f64 (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (neg.f64 (.f64 delta (cos.f64 theta))) (cos.f64 phi1)))
(* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1))))))
(.f64 (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (neg.f64 (.f64 delta (cos.f64 theta))) (cos.f64 phi1)))
(* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1))))))
(.f64 (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (neg.f64 (.f64 delta (cos.f64 theta))) (cos.f64 phi1)))
(pow (cos phi1) 2)
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (cos phi1) 2))
(.f64 (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (neg.f64 (.f64 delta (cos.f64 theta))) (cos.f64 phi1)))
(+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (cos phi1) 2))
(.f64 (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (neg.f64 (.f64 delta (cos.f64 theta))) (cos.f64 phi1)))
(+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (cos phi1) 2))
(.f64 (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (neg.f64 (.f64 delta (cos.f64 theta))) (cos.f64 phi1)))
(* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))
(.f64 (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 delta))
(* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (/ (pow (cos phi1) 2) delta)))
(.f64 delta (.f64 (cos.f64 phi1) (fma.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)) (/.f64 (cos.f64 phi1) delta))))
(* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (/ (pow (cos phi1) 2) delta)))
(.f64 delta (.f64 (cos.f64 phi1) (fma.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)) (/.f64 (cos.f64 phi1) delta))))
(* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (/ (pow (cos phi1) 2) delta)))
(.f64 delta (.f64 (cos.f64 phi1) (fma.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)) (/.f64 (cos.f64 phi1) delta))))
(* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))
(.f64 (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (neg.f64 delta))
(* -1 (* delta (+ (* -1 (/ (pow (cos phi1) 2) delta)) (* (cos phi1) (* (cos theta) (sin phi1))))))
(.f64 delta (.f64 (cos.f64 phi1) (fma.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)) (/.f64 (cos.f64 phi1) delta))))
(* -1 (* delta (+ (* -1 (/ (pow (cos phi1) 2) delta)) (* (cos phi1) (* (cos theta) (sin phi1))))))
(.f64 delta (.f64 (cos.f64 phi1) (fma.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)) (/.f64 (cos.f64 phi1) delta))))
(* -1 (* delta (+ (* -1 (/ (pow (cos phi1) 2) delta)) (* (cos phi1) (* (cos theta) (sin phi1))))))
(.f64 delta (.f64 (cos.f64 phi1) (fma.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)) (/.f64 (cos.f64 phi1) delta))))
(* (cos phi1) (+ (cos phi1) (* -1 (* delta (sin phi1)))))
(.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (.f64 delta (sin.f64 phi1))))
(+ (* 1/2 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))) (* (cos phi1) (+ (cos phi1) (* -1 (* delta (sin phi1))))))
(+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) delta)) (+.f64 #s(literal -1 binary64) (.f64 #s(literal 1/2 binary64) (*.f64 theta theta)))))
(+ (* (cos phi1) (+ (cos phi1) (* -1 (* delta (sin phi1))))) (* (pow theta 2) (+ (* -1/24 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))) (* 1/2 (* delta (* (cos phi1) (sin phi1)))))))
(fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (.f64 delta (sin.f64 phi1))) (.f64 (.f64 (.f64 theta theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) delta))) (fma.f64 #s(literal -1/24 binary64) (*.f64 theta theta) #s(literal 1/2 binary64))))
(+ (* (cos phi1) (+ (cos phi1) (* -1 (* delta (sin phi1))))) (* (pow theta 2) (+ (* 1/2 (* delta (* (cos phi1) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* delta (* (cos phi1) (sin phi1)))) (* 1/720 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))))))))
(+.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) delta)) (+.f64 #s(literal -1 binary64) (.f64 #s(literal 1/2 binary64) (.f64 theta theta))))) (.f64 (.f64 theta theta) (.f64 (.f64 (.f64 theta theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) delta))) (fma.f64 #s(literal 1/720 binary64) (*.f64 theta theta) #s(literal -1/24 binary64)))))
(* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1))))))
(.f64 (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (neg.f64 (.f64 delta (cos.f64 theta))) (cos.f64 phi1)))
(* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1))))))
(.f64 (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (neg.f64 (.f64 delta (cos.f64 theta))) (cos.f64 phi1)))
(* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1))))))
(.f64 (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (neg.f64 (.f64 delta (cos.f64 theta))) (cos.f64 phi1)))
(* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1))))))
(.f64 (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (neg.f64 (.f64 delta (cos.f64 theta))) (cos.f64 phi1)))
(* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1))))))
(.f64 (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (neg.f64 (.f64 delta (cos.f64 theta))) (cos.f64 phi1)))
(* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1))))))
(.f64 (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (neg.f64 (.f64 delta (cos.f64 theta))) (cos.f64 phi1)))
(* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1))))))
(.f64 (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (neg.f64 (.f64 delta (cos.f64 theta))) (cos.f64 phi1)))
(* (cos phi1) (+ (cos phi1) (* -1 (* delta (* (cos theta) (sin phi1))))))
(.f64 (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (neg.f64 (.f64 delta (cos.f64 theta))) (cos.f64 phi1)))
(* -1 (sin phi1))
(neg.f64 (sin.f64 phi1))
(+ (* -1 (sin phi1)) (* 1/2 (* (pow theta 2) (sin phi1))))
(.f64 (sin.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (.f64 theta theta) #s(literal -1 binary64)))
(+ (* -1 (sin phi1)) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (sin phi1))) (* 1/2 (sin phi1)))))
(fma.f64 (.f64 theta theta) (.f64 (sin.f64 phi1) (fma.f64 #s(literal -1/24 binary64) (*.f64 theta theta) #s(literal 1/2 binary64))) (neg.f64 (sin.f64 phi1)))
(+ (* -1 (sin phi1)) (* (pow theta 2) (+ (* 1/2 (sin phi1)) (* (pow theta 2) (+ (* -1/24 (sin phi1)) (* 1/720 (* (pow theta 2) (sin phi1))))))))
(fma.f64 (sin.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (.f64 theta theta) #s(literal -1 binary64)) (.f64 (.f64 theta theta) (.f64 (.f64 theta (.f64 theta (sin.f64 phi1))) (fma.f64 #s(literal 1/720 binary64) (*.f64 theta theta) #s(literal -1/24 binary64)))))
(* -1 (* (cos theta) (sin phi1)))
(neg.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* -1 (* (cos theta) (sin phi1)))
(neg.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* -1 (* (cos theta) (sin phi1)))
(neg.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* -1 (* (cos theta) (sin phi1)))
(neg.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* -1 (* (cos theta) (sin phi1)))
(neg.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* -1 (* (cos theta) (sin phi1)))
(neg.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* -1 (* (cos theta) (sin phi1)))
(neg.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* -1 (* (cos theta) (sin phi1)))
(neg.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* -1 (* phi1 (cos theta)))
(neg.f64 (*.f64 phi1 (cos.f64 theta)))
(* phi1 (+ (* -1 (cos theta)) (* 1/6 (* (pow phi1 2) (cos theta)))))
(.f64 phi1 (.f64 (cos.f64 theta) (fma.f64 #s(literal 1/6 binary64) (*.f64 phi1 phi1) #s(literal -1 binary64))))
(* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1/120 (* (pow phi1 2) (cos theta))) (* 1/6 (cos theta))))))
(.f64 phi1 (-.f64 (.f64 (.f64 phi1 phi1) (.f64 (cos.f64 theta) (fma.f64 #s(literal -1/120 binary64) (*.f64 phi1 phi1) #s(literal 1/6 binary64)))) (cos.f64 theta)))
(* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* 1/6 (cos theta)) (* (pow phi1 2) (+ (* -1/120 (cos theta)) (* 1/5040 (* (pow phi1 2) (cos theta)))))))))
(.f64 phi1 (fma.f64 (cos.f64 theta) (fma.f64 #s(literal 1/6 binary64) (.f64 phi1 phi1) #s(literal -1 binary64)) (.f64 (.f64 phi1 phi1) (.f64 (.f64 phi1 phi1) (.f64 (cos.f64 theta) (fma.f64 #s(literal 1/5040 binary64) (.f64 phi1 phi1) #s(literal -1/120 binary64)))))))
(* -1 (* (cos theta) (sin phi1)))
(neg.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* -1 (* (cos theta) (sin phi1)))
(neg.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* -1 (* (cos theta) (sin phi1)))
(neg.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* -1 (* (cos theta) (sin phi1)))
(neg.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* -1 (* (cos theta) (sin phi1)))
(neg.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* -1 (* (cos theta) (sin phi1)))
(neg.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* -1 (* (cos theta) (sin phi1)))
(neg.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* -1 (* (cos theta) (sin phi1)))
(neg.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(- 1 (pow (sin phi1) 2))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(.f64 (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (neg.f64 (.f64 delta (cos.f64 theta))) (cos.f64 phi1)))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (neg.f64 (.f64 delta (cos.f64 theta))) (cos.f64 phi1)) (.f64 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (*.f64 delta delta)))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (neg.f64 (.f64 delta (cos.f64 theta))) (cos.f64 phi1)) (.f64 (fma.f64 (sin.f64 phi1) (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) delta) (.f64 (cos.f64 theta) (cos.f64 phi1))) (.f64 #s(literal -1/2 binary64) (sin.f64 phi1))) #s(literal -1/2 binary64)) (*.f64 delta delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 phi1 (sin.f64 delta))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(-.f64 (.f64 (fma.f64 phi1 (neg.f64 phi1) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (*.f64 phi1 (sin.f64 delta))))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 phi1 (neg.f64 (fma.f64 phi1 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 #s(literal -2/3 binary64) phi1) (cos.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 delta)))) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (.f64 theta theta) #s(literal -1 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (fma.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))) (.f64 (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))) (.f64 theta theta)) (fma.f64 #s(literal -1/24 binary64) (*.f64 theta theta) #s(literal 1/2 binary64)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (fma.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (.f64 theta theta) #s(literal -1 binary64)) (.f64 (.f64 theta theta) (.f64 (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))) (.f64 theta theta)) (fma.f64 #s(literal 1/720 binary64) (*.f64 theta theta) #s(literal -1/24 binary64))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(* phi1 (* (cos theta) (sin delta)))
(.f64 (cos.f64 theta) (.f64 phi1 (sin.f64 delta)))
(* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))
(.f64 phi1 (fma.f64 (cos.f64 delta) phi1 (.f64 (cos.f64 theta) (sin.f64 delta))))
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))
(.f64 phi1 (fma.f64 phi1 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 #s(literal -2/3 binary64) phi1) (cos.f64 delta)) (.f64 (cos.f64 theta) (sin.f64 delta))))
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/3 (* phi1 (cos delta))) (* -1/6 (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta))))
(.f64 phi1 (fma.f64 phi1 (fma.f64 phi1 (fma.f64 (cos.f64 delta) (.f64 phi1 #s(literal -1/3 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) #s(literal -2/3 binary64)))) (cos.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))
(fma.f64 delta (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(+ (* delta (+ (* -1/2 (* delta (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(fma.f64 (fma.f64 delta (.f64 #s(literal -1/2 binary64) delta) #s(literal 1 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (.f64 (cos.f64 phi1) delta)))
(+ (* delta (+ (* delta (+ (* -1/2 (pow (sin phi1) 2)) (* -1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(fma.f64 delta (fma.f64 delta (.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (.f64 (fma.f64 delta (.f64 #s(literal -1/6 binary64) delta) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))
(+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))
(fma.f64 theta (.f64 theta (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 #s(literal 1/24 binary64) (.f64 theta theta) #s(literal -1/2 binary64)))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(+.f64 (fma.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))) (.f64 (.f64 theta theta) (.f64 (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))) (.f64 theta theta)) (fma.f64 #s(literal -1/720 binary64) (.f64 theta theta) #s(literal 1/24 binary64)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
1
#s(literal 1 binary64)
(+ 1 (* -2 (pow phi1 2)))
(fma.f64 phi1 (*.f64 phi1 #s(literal -2 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow phi1 2) (- (* 2/3 (pow phi1 2)) 2)))
(fma.f64 (.f64 phi1 phi1) (fma.f64 phi1 (.f64 phi1 #s(literal 2/3 binary64)) #s(literal -2 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/3 (* -4/45 (pow phi1 2)))) 2)))
(fma.f64 phi1 (.f64 phi1 (fma.f64 phi1 (.f64 phi1 (fma.f64 (*.f64 phi1 phi1) #s(literal -4/45 binary64) #s(literal 2/3 binary64))) #s(literal -2 binary64))) #s(literal 1 binary64))
(cos (* 2 phi1))
(cos.f64 (*.f64 phi1 #s(literal 2 binary64)))
(cos (* 2 phi1))
(cos.f64 (*.f64 phi1 #s(literal 2 binary64)))
(cos (* 2 phi1))
(cos.f64 (*.f64 phi1 #s(literal 2 binary64)))
(cos (* 2 phi1))
(cos.f64 (*.f64 phi1 #s(literal 2 binary64)))
(cos (* 2 phi1))
(cos.f64 (*.f64 phi1 #s(literal 2 binary64)))
(cos (* 2 phi1))
(cos.f64 (*.f64 phi1 #s(literal 2 binary64)))
(cos (* 2 phi1))
(cos.f64 (*.f64 phi1 #s(literal 2 binary64)))
(cos (* 2 phi1))
(cos.f64 (*.f64 phi1 #s(literal 2 binary64)))

rewrite392.0ms (2.4%)

Memory

21.4MiB live, 537.0MiB allocated

Rules

4 334×	`lower-fma.f32`
4 324×	`lower-fma.f64`
4 280×	`lower-*.f32`
4 254×	`lower-*.f64`
3 514×	`lower-/.f64`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	61	528
0	105	518
1	403	476
2	2871	476
0	8381	476

Stop Event

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

Counts

24 → 804

Calls

Call 1

Inputs
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))
(+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))
(neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))))
(*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))
(.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1)))
(*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))
(.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))
(cos.f64 (*.f64 #s(literal 2 binary64) phi1))

Outputs
(+.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(+.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))))
(+.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))
(+.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))
(+.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(+.f64 (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (cos.f64 delta))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (-.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (/.f64 (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))) (/.f64 (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))))
(-.f64 (/.f64 (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))))) (/.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))))
(-.f64 (/.f64 (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (-.f64 (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (cos.f64 delta))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (cos.f64 delta))))
(fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (cos.f64 delta))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))
(fma.f64 (cos.f64 delta) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (sin.f64 phi1))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1 binary64) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))
(fma.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))
(fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))))
(fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (cos.f64 delta))
(fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))
(fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))
(fma.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(fma.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (/.f64 #s(literal 1 binary64) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))))
(fma.f64 (neg.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta))) (sin.f64 delta) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (neg.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal -1 binary64)) (sin.f64 phi1) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (sin.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (sin.f64 phi1) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 delta) (neg.f64 (sin.f64 phi1))) (sin.f64 phi1) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (-.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))) (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))))))
(/.f64 (+.f64 (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))) (fma.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))) (+.f64 (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (-.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64))) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (-.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (neg.f64 (+.f64 (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (-.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))) (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (cos.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (cos.f64 delta)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))) (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))) #s(literal 2 binary64) (.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))))) (.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (cos.f64 delta))))) (.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (cos.f64 delta))))) (.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta))))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta))))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))) (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta))))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta))))) (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))) #s(literal 2 binary64) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta))))) (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))))) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta))))) (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (cos.f64 delta))))) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta))))) (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (cos.f64 delta))))) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) #s(literal 2 binary64) (.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))))) (.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (cos.f64 delta))))) (.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (cos.f64 delta))))) (.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))))) (.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (cos.f64 delta))))) (.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (cos.f64 delta))))) (.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (.f64 (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (.f64 (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (.f64 (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (.f64 (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))))) (.f64 (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (cos.f64 delta))))) (.f64 (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (cos.f64 delta))))) (.f64 (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))) (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) #s(literal 2 binary64) (.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))) (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))))) (.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (cos.f64 delta))))) (.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))) (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (cos.f64 delta))))) (.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (.f64 (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (.f64 (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (.f64 (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (.f64 (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) #s(literal 2 binary64) (.f64 (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))) (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))))) (.f64 (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))) (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (cos.f64 delta))))) (.f64 (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))) (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (cos.f64 delta))))) (.f64 (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (.f64 (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (.f64 (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (fma.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (.f64 (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (.f64 (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (fma.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) #s(literal 2 binary64) (.f64 (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))))) (.f64 (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (cos.f64 delta))))) (.f64 (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (cos.f64 delta))))) (.f64 (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta))))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta)))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))))) (.f64 (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta))))) (.f64 (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))))) (.f64 (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta)))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (.f64 (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (.f64 (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (.f64 (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1 binary64))) (.f64 (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (.f64 (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1 binary64))) (.f64 (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))))) (.f64 (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))) (.f64 (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (.f64 (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))) (.f64 (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))))) (.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta))))) (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))))) (.f64 #s(literal 2 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta)))))))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (.f64 #s(literal 2 binary64) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))))))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))) (.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (.f64 #s(literal 2 binary64) (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))))))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 #s(literal 2 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(/.f64 (fma.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (cos.f64 delta))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))))) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (cos.f64 delta))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta))))) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))))) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta)))))))
(/.f64 (fma.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (cos.f64 delta))) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))))
(/.f64 (fma.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (cos.f64 delta))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))))))
(/.f64 (fma.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (cos.f64 delta))) (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (fma.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (cos.f64 delta))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))))) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (cos.f64 delta))) (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))))))
(/.f64 (fma.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (cos.f64 delta))) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))
(/.f64 (fma.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (cos.f64 delta))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (cos.f64 delta))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta)))))))
(/.f64 (fma.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (cos.f64 delta))) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))))
(/.f64 (fma.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (cos.f64 delta))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))))))
(/.f64 (fma.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (cos.f64 delta))) (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (fma.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (cos.f64 delta))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (cos.f64 delta))) (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))))))
(/.f64 (fma.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (cos.f64 delta))) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (-.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (.f64 (-.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))) (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))) (.f64 (-.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))) (-.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))) (.f64 (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta))) (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64)))) (.f64 (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta))) (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))))
(/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)))) (.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))) (.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)))) (.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))))) (neg.f64 (neg.f64 (fma.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (-.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))) (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (cos.f64 delta))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (neg.f64 (-.f64 (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (cos.f64 delta))))
(pow.f64 (/.f64 (fma.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (-.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (-.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(.f64 (+.f64 (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))))
(.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))))
(.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(-.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))) (/.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(-.f64 (/.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)) (/.f64 (.f64 lambda1 lambda1) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1))))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 lambda1 lambda1 (.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1))) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 lambda1 lambda1 (.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1))) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 lambda1 lambda1 (.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)))))
(/.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))))))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1))
(/.f64 (-.f64 (.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))) (.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)))) (.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 lambda1 lambda1 (.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)))
(pow.f64 (/.f64 (fma.f64 lambda1 lambda1 (.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1))) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 lambda1 lambda1 (.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)))))
(.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1))) #s(literal -2 binary64))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(.f64 (sin.f64 delta) (.f64 (sin.f64 theta) (cos.f64 phi1)))
(.f64 (sin.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)))
(.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta))
(.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)
(-.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))) (/.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(-.f64 (/.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) (/.f64 (.f64 lambda1 lambda1) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1))
(/.f64 (-.f64 (.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))) (.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64)))) (.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
(-.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 delta theta)) #s(literal 2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 delta theta)) #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))))
(/.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal -2 binary64))
(/.f64 (-.f64 (.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (cos.f64 (+.f64 delta theta)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal -1 binary64))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) lambda1)
(-.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))))) (/.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))))))
(-.f64 (/.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) lambda1)) (/.f64 (.f64 lambda1 lambda1) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) lambda1)))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) lambda1))))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1)))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 lambda1 lambda1 (.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) lambda1))) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1)))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 lambda1 lambda1 (.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) lambda1))) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1)))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 lambda1 lambda1 (.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) lambda1)))))
(/.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))))))))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) lambda1))
(/.f64 (-.f64 (.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))))) (.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1)))))) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) #s(literal 2 binary64)))) (.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1)))))) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 lambda1 lambda1 (.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) lambda1))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1)))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) lambda1)))
(pow.f64 (/.f64 (fma.f64 lambda1 lambda1 (.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) lambda1))) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1)))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 lambda1 lambda1 (.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) lambda1)))))
(.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(-.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))) (/.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(-.f64 (/.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)) (/.f64 (.f64 lambda1 lambda1) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1))))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 lambda1 lambda1 (.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1))) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 lambda1 lambda1 (.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1))) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 lambda1 lambda1 (.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)))))
(/.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))))))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1))
(/.f64 (-.f64 (.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))) (.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)))) (.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 lambda1 lambda1 (.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)))
(pow.f64 (/.f64 (fma.f64 lambda1 lambda1 (.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1))) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 lambda1 lambda1 (.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)))))
(.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(+.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))))
(+.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) (cos.f64 delta))
(-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta)))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(-.f64 (+.f64 (cos.f64 delta) #s(literal 0 binary64)) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))))) (/.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))))))
(fma.f64 (sin.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta)) (cos.f64 delta))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta) (cos.f64 delta))
(fma.f64 (cos.f64 delta) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta))
(fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (cos.f64 delta))
(fma.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1 binary64) (cos.f64 delta))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta))
(fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (*.f64 (cos.f64 delta) (neg.f64 (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (+.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (+.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (neg.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) (.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (pow.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))))))
(pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (+.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) #s(literal -1 binary64))
(.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))))
(.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(+.f64 #s(literal 0 binary64) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))))
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(-.f64 (/.f64 #s(literal 0 binary64) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) (/.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(-.f64 (/.f64 #s(literal 0 binary64) (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(neg.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(neg.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) #s(literal 2 binary64))
(/.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (cos.f64 delta))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (cos.f64 delta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (cos.f64 delta)))) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (cos.f64 delta)))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(.f64 (sin.f64 phi1) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(.f64 (neg.f64 (sin.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta))
(*.f64 (cos.f64 delta) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))
(.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1 binary64))
(.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (neg.f64 (sin.f64 phi1)))
(.f64 #s(literal -1 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(.f64 #s(literal -1 binary64) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (sin.f64 phi1))
(.f64 (.f64 (cos.f64 delta) (neg.f64 (sin.f64 phi1))) (sin.f64 phi1))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(+.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 phi1)) #s(literal 2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
(-.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 2 binary64)))
(-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(fma.f64 (neg.f64 (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))))
(/.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (-.f64 (.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64)))) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (-.f64 (.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))))) (neg.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow.f64 (neg.f64 (sin.f64 phi1)) #s(literal 2 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))) #s(literal -1 binary64))
(*.f64 (sin.f64 phi1) (sin.f64 phi1))
(*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)))
(.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(-.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))) (/.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(-.f64 (/.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)) (/.f64 (.f64 lambda1 lambda1) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1))))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 lambda1 lambda1 (.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1))) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 lambda1 lambda1 (.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1))) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 lambda1 lambda1 (.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)))))
(/.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))))))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1))
(/.f64 (-.f64 (.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))) (.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)))) (.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 lambda1 lambda1 (.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)))
(pow.f64 (/.f64 (fma.f64 lambda1 lambda1 (.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1))) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 lambda1 lambda1 (.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)))))
(.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(-.f64 (/.f64 #s(literal 1/8 binary64) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))) (/.f64 (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64)) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(-.f64 (/.f64 #s(literal 1/4 binary64) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) (neg.f64 (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))) (neg.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(*.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1))
(*.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 (*.f64 (cos.f64 phi1) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta))) (cos.f64 phi1))) #s(literal -2 binary64))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (cos.f64 phi1)))
(.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)))
(.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (cos.f64 phi1))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta))
(.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 delta (cos.f64 phi1))))
(+.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 delta (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 delta (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 delta (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (-.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 delta (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(fma.f64 delta (.f64 (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 delta (cos.f64 phi1))))
(fma.f64 (cos.f64 phi1) (neg.f64 (.f64 (.f64 delta (cos.f64 theta)) (sin.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 delta (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(fma.f64 (neg.f64 (.f64 (.f64 delta (cos.f64 theta)) (sin.f64 phi1))) (cos.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(fma.f64 (.f64 delta (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(fma.f64 (.f64 (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta))) delta (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 delta (cos.f64 phi1))))
(fma.f64 (.f64 (cos.f64 phi1) delta) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(fma.f64 (.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 delta (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 6 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 delta (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 delta (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 delta (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (-.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 delta (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (.f64 (cos.f64 phi1) (+.f64 (pow.f64 (neg.f64 (.f64 (.f64 delta (cos.f64 theta)) (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (neg.f64 (.f64 (.f64 delta (cos.f64 theta)) (sin.f64 phi1)))) (pow.f64 (neg.f64 (.f64 (*.f64 delta (cos.f64 theta)) (sin.f64 phi1))) #s(literal 2 binary64))))
(/.f64 (.f64 (cos.f64 phi1) (-.f64 (pow.f64 (neg.f64 (.f64 (.f64 delta (cos.f64 theta)) (sin.f64 phi1))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (neg.f64 (cos.f64 phi1))))
(/.f64 (.f64 (+.f64 (pow.f64 (neg.f64 (.f64 (.f64 delta (cos.f64 theta)) (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (cos.f64 phi1)) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (neg.f64 (.f64 (.f64 delta (cos.f64 theta)) (sin.f64 phi1)))) (pow.f64 (neg.f64 (.f64 (*.f64 delta (cos.f64 theta)) (sin.f64 phi1))) #s(literal 2 binary64))))
(/.f64 (.f64 (-.f64 (pow.f64 (neg.f64 (.f64 (.f64 delta (cos.f64 theta)) (sin.f64 phi1))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (neg.f64 (cos.f64 phi1))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 delta (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 delta (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 delta (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 delta (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 delta (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (.f64 (cos.f64 phi1) (+.f64 (pow.f64 (neg.f64 (.f64 (.f64 delta (cos.f64 theta)) (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (neg.f64 (.f64 (.f64 delta (cos.f64 theta)) (sin.f64 phi1)))) (pow.f64 (neg.f64 (.f64 (*.f64 delta (cos.f64 theta)) (sin.f64 phi1))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (.f64 (cos.f64 phi1) (-.f64 (pow.f64 (neg.f64 (.f64 (.f64 delta (cos.f64 theta)) (sin.f64 phi1))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (neg.f64 (cos.f64 phi1)))))
(/.f64 (neg.f64 (.f64 (+.f64 (pow.f64 (neg.f64 (.f64 (.f64 delta (cos.f64 theta)) (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (cos.f64 phi1))) (neg.f64 (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (neg.f64 (.f64 (.f64 delta (cos.f64 theta)) (sin.f64 phi1)))) (pow.f64 (neg.f64 (.f64 (*.f64 delta (cos.f64 theta)) (sin.f64 phi1))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (.f64 (-.f64 (pow.f64 (neg.f64 (.f64 (.f64 delta (cos.f64 theta)) (sin.f64 phi1))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (cos.f64 phi1))) (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (neg.f64 (cos.f64 phi1)))))
(.f64 (cos.f64 phi1) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1)))
(.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (cos.f64 phi1))
(-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(neg.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(*.f64 (sin.f64 phi1) (neg.f64 (cos.f64 theta)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta))
(*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))
(.f64 #s(literal -1 binary64) (.f64 (sin.f64 phi1) (cos.f64 theta)))
(*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1))
(.f64 (.f64 (cos.f64 theta) #s(literal -1 binary64)) (sin.f64 phi1))
(+.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(+.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))))
(+.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))
(+.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))
(+.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(+.f64 (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (cos.f64 delta))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (-.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (/.f64 (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))) (/.f64 (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))))
(-.f64 (/.f64 (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))))) (/.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))))
(-.f64 (/.f64 (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (-.f64 (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (cos.f64 delta))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (cos.f64 delta))))
(fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (cos.f64 delta))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))
(fma.f64 (cos.f64 delta) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (sin.f64 phi1))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1 binary64) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))
(fma.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))
(fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))))
(fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (cos.f64 delta))
(fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))
(fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))
(fma.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(fma.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (/.f64 #s(literal 1 binary64) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))))
(fma.f64 (neg.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta))) (sin.f64 delta) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (neg.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal -1 binary64)) (sin.f64 phi1) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (sin.f64 phi1))) (cos.f64 theta) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (sin.f64 phi1) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 delta) (neg.f64 (sin.f64 phi1))) (sin.f64 phi1) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (-.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))) (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))))))
(/.f64 (+.f64 (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))) (fma.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))) (+.f64 (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (-.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64))) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (-.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (neg.f64 (+.f64 (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (-.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))) (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (cos.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (cos.f64 delta)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))) (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))) #s(literal 2 binary64) (.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))))) (.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (cos.f64 delta))))) (.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (cos.f64 delta))))) (.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta))))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta))))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))) (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta))))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta))))) (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))) #s(literal 2 binary64) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta))))) (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))))) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta))))) (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (cos.f64 delta))))) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta))))) (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (cos.f64 delta))))) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) #s(literal 2 binary64) (.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))))) (.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (cos.f64 delta))))) (.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (cos.f64 delta))))) (.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))))) (.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (cos.f64 delta))))) (.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (cos.f64 delta))))) (.f64 (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (.f64 (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (.f64 (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (.f64 (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (.f64 (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))))) (.f64 (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (cos.f64 delta))))) (.f64 (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (cos.f64 delta))))) (.f64 (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))) (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) #s(literal 2 binary64) (.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))) (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))))) (.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (cos.f64 delta))))) (.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))) (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (cos.f64 delta))))) (.f64 (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (.f64 (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (.f64 (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (.f64 (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (.f64 (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) #s(literal 2 binary64) (.f64 (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))) (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))))) (.f64 (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))) (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (cos.f64 delta))))) (.f64 (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))) (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (cos.f64 delta))))) (.f64 (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (.f64 (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (.f64 (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (fma.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (.f64 (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (.f64 (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (fma.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) #s(literal 2 binary64) (.f64 (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))))) (.f64 (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (cos.f64 delta))))) (.f64 (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (cos.f64 delta))))) (.f64 (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta))))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta)))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))) (.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))))) (.f64 (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta))))) (.f64 (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))))) (.f64 (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta)))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (.f64 (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (.f64 (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (.f64 (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1 binary64))) (.f64 (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (.f64 (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1 binary64))) (.f64 (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))))) (.f64 (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))) (.f64 (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (.f64 (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))) (.f64 (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))))) (.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta))))) (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))))) (.f64 #s(literal 2 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta)))))))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (.f64 #s(literal 2 binary64) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))))))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))) (.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (.f64 #s(literal 2 binary64) (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))))))
(/.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 #s(literal 2 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(/.f64 (fma.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (cos.f64 delta))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))))) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (cos.f64 delta))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta))))) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))))) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta)))))))
(/.f64 (fma.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (cos.f64 delta))) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))))
(/.f64 (fma.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (cos.f64 delta))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))))))
(/.f64 (fma.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (cos.f64 delta))) (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (fma.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (cos.f64 delta))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))))) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (cos.f64 delta))) (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))))))
(/.f64 (fma.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (cos.f64 delta))) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))
(/.f64 (fma.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (cos.f64 delta))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (cos.f64 delta))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta)))))))
(/.f64 (fma.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (cos.f64 delta))) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))))
(/.f64 (fma.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (cos.f64 delta))) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))))))
(/.f64 (fma.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (cos.f64 delta))) (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (fma.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (cos.f64 delta))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (cos.f64 delta))) (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))))))
(/.f64 (fma.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (cos.f64 delta))) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (-.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))) (.f64 (-.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))) (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))) (.f64 (-.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))) (-.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))) (.f64 (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta))) (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64)))) (.f64 (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta))) (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))))
(/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)))) (.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))) (.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)))) (.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))))) (neg.f64 (neg.f64 (fma.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (-.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))) (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (cos.f64 delta))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (neg.f64 (-.f64 (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (cos.f64 delta))))
(pow.f64 (/.f64 (fma.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (-.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (-.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)))) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(.f64 (+.f64 (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (neg.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)))))
(.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))
(.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))))
(.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (pow.f64 (.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))))
(+.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(+.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(+.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 2 binary64)))
(fma.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (.f64 (sin.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(fma.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))
(fma.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1)) (.f64 (sin.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(fma.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (cos.f64 theta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)) (.f64 (sin.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(fma.f64 (cos.f64 theta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 phi1)) (.f64 (sin.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(fma.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (.f64 (sin.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 theta)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))) #s(literal 2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))))))
(/.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) phi1)) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))))) #s(literal -2 binary64))
(/.f64 (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64)))) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(/.f64 (.f64 (sin.f64 phi1) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64))))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(/.f64 (.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)))) (sin.f64 phi1)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(/.f64 (-.f64 (.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))))) #s(literal 4 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) phi1)) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(/.f64 (neg.f64 (.f64 (sin.f64 phi1) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)))))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(/.f64 (neg.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64))) (sin.f64 phi1))) (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(/.f64 (neg.f64 (.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 2 binary64)))) (sin.f64 phi1))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))))) #s(literal -1 binary64))
(.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))
(.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))) #s(literal 1/2 binary64))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(cos.f64 (*.f64 phi1 #s(literal 2 binary64)))
(cos.f64 (+.f64 phi1 phi1))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi1) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (fma.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 #s(literal 2 binary64) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))))) (.f64 #s(literal 2 binary64) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))) (.f64 #s(literal 2 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))))) (.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (fma.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) #s(literal 2 binary64)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))))
(/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))))))))
(/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))))
(/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 #s(literal 2 binary64) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 4 binary64))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))))))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))) (.f64 #s(literal 2 binary64) (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))) (.f64 #s(literal 2 binary64) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (.f64 #s(literal 2 binary64) (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))) (.f64 #s(literal 2 binary64) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))))) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64))) (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 1 binary64))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (neg.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) #s(literal -1 binary64))
(*.f64 (+.f64 (cos.f64 phi1) (sin.f64 phi1)) (-.f64 (cos.f64 phi1) (sin.f64 phi1)))

eval319.0ms (1.9%)

Memory: 2.0MiB live, 618.3MiB allocated
Compiler: Compiled 99 918 to 4 274 computations (95.7% saved)

prune774.0ms (4.7%)

Memory

-256.8MiB live, 485.5MiB allocated

Pruning

36 alts after pruning (35 fresh and 1 done)

	Pruned	Kept	Total
New	1 954	32	1 986
Fresh	12	3	15
Picked	4	1	5
Done	0	0	0
Total	1 970	36	2 006

Accuracy

100.0%

Counts

2 006 → 36

Alt Table

Click to see full alt table

Status	Accuracy	Program
	59.3%	(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1))
	99.4%	(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
	99.3%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
	99.3%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
	99.3%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))))))
	99.3%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
	92.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 #s(approx (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (cos.f64 delta)))))
	82.0%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
▶	89.4%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
	48.9%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
	92.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) #s(approx ( (cos phi1) (* (sin delta) (cos theta))) (*.f64 (cos.f64 theta) (sin.f64 delta)))) (sin.f64 phi1)))))
	89.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
	92.9%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
	84.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1)) (.f64 (cos.f64 theta) (.f64 phi1 (sin.f64 delta)))))))
	94.3%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (cos.f64 phi1) (.f64 (cos.f64 delta) (sin.f64 phi1))))))))
▶	99.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))))
▶	80.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
	94.4%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
	80.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
✓	89.2%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	76.2%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (* (cos phi1) (+ (* delta (* (cos theta) (neg (sin phi1)))) (cos phi1))) (fma.f64 (cos.f64 theta) (*.f64 phi1 (neg.f64 delta)) #s(literal 1 binary64))))))
	77.5%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (* (cos phi1) (+ (* delta (* (cos theta) (neg (sin phi1)))) (cos phi1))) #s(literal 1 binary64)))))
	79.3%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))))
	73.5%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 delta (sin.f64 theta)))) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	74.3%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	76.5%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))))
	74.1%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	76.1%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	68.7%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))))
	87.6%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))))
▶	87.0%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	67.0%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 theta (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))))
	72.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 theta (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	30.9%	#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
	99.3%	#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))) lambda1) lambda1))
▶	30.8%	#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))

Compiler

Compiled 2 463 to 1 483 computations (39.8% saved)

simplify324.0ms (2%)

Memory

24.7MiB live, 333.5MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	0	(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))
cost-diff	0	#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
cost-diff	128	(neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))
cost-diff	192	(+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64))
cost-diff	0	(*.f64 (sin.f64 theta) (sin.f64 delta))
cost-diff	0	(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
cost-diff	0	(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))
cost-diff	0	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
cost-diff	0	(*.f64 (sin.f64 theta) (sin.f64 delta))
cost-diff	0	(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
cost-diff	0	(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
cost-diff	0	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
cost-diff	0	(*.f64 (sin.f64 delta) (sin.f64 theta))
cost-diff	0	#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
cost-diff	0	(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
cost-diff	0	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
cost-diff	0	(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
cost-diff	0	(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
cost-diff	0	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))))
cost-diff	6464	(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))

Rules

15 676×	`lower-fma.f32`
15 670×	`lower-fma.f64`
3 048×	`lower-*.f32`
3 018×	`lower-*.f64`
2 706×	`lower-+.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	88	880
0	139	877
1	242	850
2	469	847
3	1078	844
4	2296	823
5	3411	823
6	4098	823
7	4809	823
8	4998	823
9	5151	823
10	5848	823
11	7376	823
12	7679	823
0	8121	809

Stop Event

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

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
#s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(sin.f64 phi1)
(.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)))
(neg.f64 (cos.f64 phi1))
(*.f64 (cos.f64 theta) (sin.f64 delta))
(cos.f64 theta)
(*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
#s(literal 2 binary64)
(cos.f64 delta)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
lambda1
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(sin.f64 delta)
delta
(sin.f64 theta)
theta
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
(cos.f64 delta)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
#s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
#s(literal 2 binary64)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta))
(neg.f64 (sin.f64 phi1))
(sin.f64 phi1)
(cos.f64 theta)
(*.f64 (cos.f64 phi1) (sin.f64 delta))
#s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))
(cos.f64 delta)
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(sin.f64 delta)
delta
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(cos.f64 phi1)
phi1
(sin.f64 theta)
theta
(-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))
#s(literal -1/2 binary64)
(cos.f64 (*.f64 phi1 #s(literal 2 binary64)))
(*.f64 phi1 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(literal 1/2 binary64)
#s(literal 1 binary64)
(cos.f64 delta)
(.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))
(cos.f64 theta)
(.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(sin.f64 phi1)
(*.f64 (sin.f64 delta) (cos.f64 phi1))

Outputs
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (.f64 (cos.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (cos.f64 delta)))))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (.f64 (cos.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (cos.f64 delta))))))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
#s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
#s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (.f64 (cos.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (cos.f64 delta)))))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(.f64 (cos.f64 phi1) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (cos.f64 delta))))
(sin.f64 phi1)
(.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)))
(.f64 (neg.f64 (cos.f64 phi1)) (.f64 (sin.f64 delta) (cos.f64 theta)))
(neg.f64 (cos.f64 phi1))
(*.f64 (cos.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(cos.f64 theta)
(*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
#s(literal 2 binary64)
(cos.f64 delta)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
lambda1
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 delta)
delta
(sin.f64 theta)
theta
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
(cos.f64 delta)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
#s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
#s(literal 2 binary64)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))
(atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta))
(*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))
(neg.f64 (sin.f64 phi1))
(sin.f64 phi1)
(cos.f64 theta)
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
#s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))
(cos.f64 delta)
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (neg.f64 (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))
(atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (neg.f64 (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(sin.f64 delta)
delta
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(*.f64 (sin.f64 theta) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 theta)
theta
(-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (neg.f64 (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))
#s(literal -1/2 binary64)
(cos.f64 (*.f64 phi1 #s(literal 2 binary64)))
(*.f64 phi1 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(literal 1/2 binary64)
#s(literal 1 binary64)
(cos.f64 delta)
(.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))
(.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))
(cos.f64 theta)
(.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 phi1)))
(sin.f64 phi1)
(*.f64 (sin.f64 delta) (cos.f64 phi1))

localize486.0ms (3%)

Memory

9.3MiB live, 633.8MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.24219257867903557	(cos.f64 (*.f64 phi1 #s(literal 2 binary64)))
accuracy	0.5751315193363393	(+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64))
accuracy	16.487817188594615	(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))
accuracy	44.10986219622616	#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
accuracy	0.171875	(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta))
accuracy	0.1953125	(*.f64 (cos.f64 phi1) (sin.f64 delta))
accuracy	0.19921875	(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy	25.097028800215387	#s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))
accuracy	0.15234375	(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
accuracy	0.19921875	(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy	0.27572250976844204	(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
accuracy	27.25727532979405	#s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
accuracy	0.13738251953688402	(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
accuracy	0.19921875	(*.f64 (sin.f64 delta) (sin.f64 theta))
accuracy	23.647935739802772	#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
accuracy	25.822557653006072	#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
accuracy	0.15234375	(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
accuracy	0.19921875	(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy	0.232753759768442	(.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)))
accuracy	0.27572250976844204	(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))

Samples

183.0ms	83×	2	valid
86.0ms	127×	0	valid
80.0ms	46×	1	valid

Compiler

Compiled 743 to 71 computations (90.4% saved)

Precisions

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

ival-mult: 65.0ms (22.2% of total)

ival-cos: 62.0ms (21.1% of total)

ival-sin: 56.0ms (19.1% of total)

adjust: 52.0ms (17.7% of total)

ival-add: 22.0ms (7.5% of total)

ival-atan2: 13.0ms (4.4% of total)

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

ival-asin: 6.0ms (2% of total)

ival-neg: 6.0ms (2% of total)

ival-pow2: 4.0ms (1.4% of total)

exact: 1.0ms (0.3% of total)

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

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

series84.0ms (0.5%)

Memory

-2.2MiB live, 152.1MiB allocated

Counts

26 → 816

Calls

Call 1

Inputs
#s(alt (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (patch (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())
#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())
#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())
#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())
#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())
#s(alt (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) (patch (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) #<representation binary64>) () ())
#s(alt (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (patch (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())
#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())
#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())
#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())
#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) #<representation binary64>) () ())
#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (cos.f64 (.f64 phi1 #s(literal 2 binary64))) (patch (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #<representation binary64>) () ())

Outputs
#s(alt (cos delta) (taylor 0 phi1) (#s(alt (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (patch (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (patch (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta)))))) (taylor 0 phi1) (#s(alt (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (patch (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (+ (* -1 (cos delta)) (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))))))) (taylor 0 phi1) (#s(alt (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (patch (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2))) (taylor inf phi1) (#s(alt (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (patch (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2))) (taylor inf phi1) (#s(alt (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (patch (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2))) (taylor inf phi1) (#s(alt (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (patch (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2))) (taylor inf phi1) (#s(alt (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (patch (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2))) (taylor -inf phi1) (#s(alt (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (patch (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2))) (taylor -inf phi1) (#s(alt (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (patch (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2))) (taylor -inf phi1) (#s(alt (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (patch (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2))) (taylor -inf phi1) (#s(alt (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (patch (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (cos delta) (pow (cos phi1) 2))) (taylor 0 theta) (#s(alt (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (patch (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (+ (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))) (taylor 0 theta) (#s(alt (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (patch (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (+ (* (cos delta) (pow (cos phi1) 2)) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (patch (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (+ (* (cos delta) (pow (cos phi1) 2)) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))))) (taylor 0 theta) (#s(alt (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (patch (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2))) (taylor inf theta) (#s(alt (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (patch (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2))) (taylor inf theta) (#s(alt (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (patch (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2))) (taylor inf theta) (#s(alt (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (patch (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2))) (taylor inf theta) (#s(alt (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (patch (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2))) (taylor -inf theta) (#s(alt (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (patch (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2))) (taylor -inf theta) (#s(alt (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (patch (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2))) (taylor -inf theta) (#s(alt (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (patch (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2))) (taylor -inf theta) (#s(alt (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (patch (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (pow (cos phi1) 2) (taylor 0 delta) (#s(alt (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (patch (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (cos phi1) 2)) (taylor 0 delta) (#s(alt (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (patch (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* -1/2 (* delta (pow (cos phi1) 2))))) (pow (cos phi1) 2)) (taylor 0 delta) (#s(alt (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (patch (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (+ (* -1/2 (pow (cos phi1) 2)) (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))))) (pow (cos phi1) 2)) (taylor 0 delta) (#s(alt (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (patch (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2))) (taylor inf delta) (#s(alt (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (patch (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2))) (taylor inf delta) (#s(alt (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (patch (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2))) (taylor inf delta) (#s(alt (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (patch (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2))) (taylor inf delta) (#s(alt (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (patch (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2))) (taylor -inf delta) (#s(alt (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (patch (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2))) (taylor -inf delta) (#s(alt (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (patch (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2))) (taylor -inf delta) (#s(alt (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (patch (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2))) (taylor -inf delta) (#s(alt (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (patch (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta)))) (taylor 0 theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta)))))))) (taylor 0 theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta))))))))) (taylor 0 theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (sin theta))) (taylor 0 delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta)))) (taylor 0 delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta)))))))) (taylor 0 delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta))))))))) (taylor 0 delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor 0 phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta))) (taylor 0 phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta))))))) (taylor 0 phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta)))))))) (taylor 0 phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta)))) (taylor 0 theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta)))))))) (taylor 0 theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta))))))))) (taylor 0 theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (sin theta))) (taylor 0 delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta)))) (taylor 0 delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta)))))))) (taylor 0 delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta))))))))) (taylor 0 delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor 0 phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta))) (taylor 0 phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta))))))) (taylor 0 phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta)))))))) (taylor 0 phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor 0 delta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta))))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta))))))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta)))))))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor 0 theta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta))))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta)))))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta))))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta)))))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor 0 delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta))))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta))))))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta)))))))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 phi1) (#s(alt (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (pow phi1 2))) (taylor 0 phi1) (#s(alt (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1))) (taylor 0 phi1) (#s(alt (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1))) (taylor 0 phi1) (#s(alt (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor -inf phi1) (#s(alt (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor -inf phi1) (#s(alt (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor -inf phi1) (#s(alt (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor -inf phi1) (#s(alt (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (patch (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow phi1 2)) (taylor 0 phi1) (#s(alt (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)) (taylor 0 phi1) (#s(alt (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)) (taylor 0 phi1) (#s(alt (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* (pow phi1 2) (- (* 1/315 (pow phi1 2)) 2/45)))) 1)) (taylor 0 phi1) (#s(alt (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (taylor inf phi1) (#s(alt (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (taylor inf phi1) (#s(alt (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (taylor inf phi1) (#s(alt (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (taylor inf phi1) (#s(alt (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (taylor -inf phi1) (#s(alt (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (taylor -inf phi1) (#s(alt (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (taylor -inf phi1) (#s(alt (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1))))) (taylor -inf phi1) (#s(alt (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 lambda1) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 lambda1) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 lambda1) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 lambda1) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf phi1) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf phi1) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf phi1) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf phi1) (#s(alt #s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))) (patch #s(approx (+ lambda1 (atan2 ( (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) (patch (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) (patch (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) (patch (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) (patch (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) (patch (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) (patch (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) (patch (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) (patch (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) (patch (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) (patch (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) (patch (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) (patch (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) (patch (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) (patch (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) (patch (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) (patch (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) (patch (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) (patch (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) (patch (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) (patch (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) (patch (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) (patch (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) (patch (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) (patch (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) (patch (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) (patch (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) (patch (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) (patch (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) (patch (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) (patch (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) (patch (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) (patch (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) (patch (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) (patch (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) (patch (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) (patch (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 phi1) (#s(alt (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (pow phi1 2))) (taylor 0 phi1) (#s(alt (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1))) (taylor 0 phi1) (#s(alt (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1))) (taylor 0 phi1) (#s(alt (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (cos phi1) 2) (taylor inf phi1) (#s(alt (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (cos phi1) 2) (taylor inf phi1) (#s(alt (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (cos phi1) 2) (taylor inf phi1) (#s(alt (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (cos phi1) 2) (taylor inf phi1) (#s(alt (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (cos phi1) 2) (taylor -inf phi1) (#s(alt (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (cos phi1) 2) (taylor -inf phi1) (#s(alt (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (cos phi1) 2) (taylor -inf phi1) (#s(alt (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (cos phi1) 2) (taylor -inf phi1) (#s(alt (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (patch (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos theta) (sin delta))) (* 1/2 (* (pow phi1 2) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (patch (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/24 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* 1/2 (* (cos theta) (sin delta)))))) (taylor 0 phi1) (#s(alt (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (patch (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/2 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/24 (* (cos theta) (sin delta))) (* 1/720 (* (pow phi1 2) (* (cos theta) (sin delta))))))))) (taylor 0 phi1) (#s(alt (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (patch (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf phi1) (#s(alt (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (patch (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf phi1) (#s(alt (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (patch (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf phi1) (#s(alt (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (patch (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf phi1) (#s(alt (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (patch (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf phi1) (#s(alt (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (patch (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf phi1) (#s(alt (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (patch (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf phi1) (#s(alt (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (patch (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf phi1) (#s(alt (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (patch (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (patch (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (sin delta))) (* 1/2 (* (pow theta 2) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (patch (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/2 (* (cos phi1) (sin delta)))))) (taylor 0 theta) (#s(alt (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (patch (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (sin delta))) (* 1/720 (* (pow theta 2) (* (cos phi1) (sin delta))))))))) (taylor 0 theta) (#s(alt (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (patch (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf theta) (#s(alt (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (patch (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf theta) (#s(alt (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (patch (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf theta) (#s(alt (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (patch (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf theta) (#s(alt (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (patch (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf theta) (#s(alt (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (patch (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf theta) (#s(alt (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (patch (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf theta) (#s(alt (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (patch (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf theta) (#s(alt (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (patch (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* delta (* (cos phi1) (cos theta)))) (taylor 0 delta) (#s(alt (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (patch (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1 (* (cos phi1) (cos theta))) (* 1/6 (* (pow delta 2) (* (cos phi1) (cos theta)))))) (taylor 0 delta) (#s(alt (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (patch (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1 (* (cos phi1) (cos theta))) (* (pow delta 2) (+ (* -1/120 (* (pow delta 2) (* (cos phi1) (cos theta)))) (* 1/6 (* (cos phi1) (cos theta))))))) (taylor 0 delta) (#s(alt (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (patch (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1 (* (cos phi1) (cos theta))) (* (pow delta 2) (+ (* 1/6 (* (cos phi1) (cos theta))) (* (pow delta 2) (+ (* -1/120 (* (cos phi1) (cos theta))) (* 1/5040 (* (pow delta 2) (* (cos phi1) (cos theta)))))))))) (taylor 0 delta) (#s(alt (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (patch (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf delta) (#s(alt (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (patch (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf delta) (#s(alt (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (patch (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf delta) (#s(alt (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (patch (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf delta) (#s(alt (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (patch (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf delta) (#s(alt (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (patch (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf delta) (#s(alt (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (patch (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf delta) (#s(alt (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (patch (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf delta) (#s(alt (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (patch (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (pow phi1 2) (cos delta)))) (taylor 0 phi1) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta)))) (taylor 0 phi1) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta)))) (taylor 0 phi1) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor 0 delta) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1 (* (pow delta 2) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* 1/2 (cos (* 2 phi1))))) (taylor 0 delta) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- 1/24 (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))))) (taylor 0 delta) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- (+ 1/24 (* -1 (* (pow delta 2) (+ 1/720 (* -1/720 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))) (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))))) (taylor 0 delta) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (sin delta) (taylor 0 phi1) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (sin delta) (* -1/2 (* (pow phi1 2) (sin delta)))) (taylor 0 phi1) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* 1/24 (* (pow phi1 2) (sin delta)))))) (taylor 0 phi1) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin delta))) (* 1/24 (sin delta))))))) (taylor 0 phi1) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor inf phi1) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor inf phi1) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor inf phi1) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor inf phi1) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor -inf phi1) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor -inf phi1) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor -inf phi1) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor -inf phi1) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (cos phi1)) (taylor 0 delta) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (cos phi1) (* -1/6 (* (pow delta 2) (cos phi1))))) (taylor 0 delta) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow delta 2) (cos phi1))))))) (taylor 0 delta) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (cos phi1))) (* 1/120 (cos phi1)))))))) (taylor 0 delta) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor inf delta) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor inf delta) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor inf delta) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor inf delta) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor -inf delta) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor -inf delta) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor -inf delta) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor -inf delta) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (cos theta))) (taylor 0 phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (cos theta)) (* 1/6 (* (pow phi1 2) (cos theta))))) (taylor 0 phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1/120 (* (pow phi1 2) (cos theta))) (* 1/6 (cos theta)))))) (taylor 0 phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* 1/6 (cos theta)) (* (pow phi1 2) (+ (* -1/120 (cos theta)) (* 1/5040 (* (pow phi1 2) (cos theta))))))))) (taylor 0 phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos theta) (sin phi1))) (taylor inf phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos theta) (sin phi1))) (taylor inf phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos theta) (sin phi1))) (taylor inf phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos theta) (sin phi1))) (taylor inf phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos theta) (sin phi1))) (taylor -inf phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos theta) (sin phi1))) (taylor -inf phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos theta) (sin phi1))) (taylor -inf phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos theta) (sin phi1))) (taylor -inf phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* -1 (sin phi1)) (taylor 0 theta) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (sin phi1)) (* 1/2 (* (pow theta 2) (sin phi1)))) (taylor 0 theta) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (sin phi1)) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (sin phi1))) (* 1/2 (sin phi1))))) (taylor 0 theta) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (sin phi1)) (* (pow theta 2) (+ (* 1/2 (sin phi1)) (* (pow theta 2) (+ (* -1/24 (sin phi1)) (* 1/720 (* (pow theta 2) (sin phi1)))))))) (taylor 0 theta) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos theta) (sin phi1))) (taylor inf theta) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos theta) (sin phi1))) (taylor inf theta) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos theta) (sin phi1))) (taylor inf theta) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos theta) (sin phi1))) (taylor inf theta) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos theta) (sin phi1))) (taylor -inf theta) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos theta) (sin phi1))) (taylor -inf theta) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos theta) (sin phi1))) (taylor -inf theta) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos theta) (sin phi1))) (taylor -inf theta) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (pow phi1 2) (taylor 0 phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2)))) (taylor 0 phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3)))) (taylor 0 phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3)))) (taylor 0 phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor -inf phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor -inf phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor -inf phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 phi1)))) (taylor -inf phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 phi1) (#s(alt (cos.f64 (.f64 phi1 #s(literal 2 binary64))) (patch (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -2 (pow phi1 2))) (taylor 0 phi1) (#s(alt (cos.f64 (.f64 phi1 #s(literal 2 binary64))) (patch (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi1 2) (- (* 2/3 (pow phi1 2)) 2))) (taylor 0 phi1) (#s(alt (cos.f64 (.f64 phi1 #s(literal 2 binary64))) (patch (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/3 (* -4/45 (pow phi1 2)))) 2))) (taylor 0 phi1) (#s(alt (cos.f64 (.f64 phi1 #s(literal 2 binary64))) (patch (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 phi1)) (taylor inf phi1) (#s(alt (cos.f64 (.f64 phi1 #s(literal 2 binary64))) (patch (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 phi1)) (taylor inf phi1) (#s(alt (cos.f64 (.f64 phi1 #s(literal 2 binary64))) (patch (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 phi1)) (taylor inf phi1) (#s(alt (cos.f64 (.f64 phi1 #s(literal 2 binary64))) (patch (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 phi1)) (taylor inf phi1) (#s(alt (cos.f64 (.f64 phi1 #s(literal 2 binary64))) (patch (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 phi1)) (taylor -inf phi1) (#s(alt (cos.f64 (.f64 phi1 #s(literal 2 binary64))) (patch (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 phi1)) (taylor -inf phi1) (#s(alt (cos.f64 (.f64 phi1 #s(literal 2 binary64))) (patch (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 phi1)) (taylor -inf phi1) (#s(alt (cos.f64 (.f64 phi1 #s(literal 2 binary64))) (patch (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 phi1)) (taylor -inf phi1) (#s(alt (cos.f64 (.f64 phi1 #s(literal 2 binary64))) (patch (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #<representation binary64>) () ())) ())

Calls

204 calls:

Time	Variable		Point	Expression
2.0ms	theta	@	0	(- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))
1.0ms	phi1	@	-inf	(+ (* (sin phi1) (* (neg (cos phi1)) (* (cos theta) (sin delta)))) (* (pow (cos phi1) 2) (cos delta)))
1.0ms	phi1	@	inf	(+ (* (sin phi1) (* (neg (cos phi1)) (* (cos theta) (sin delta)))) (* (pow (cos phi1) 2) (cos delta)))
1.0ms	delta	@	inf	(+ (* (sin phi1) (* (neg (cos phi1)) (* (cos theta) (sin delta)))) (* (pow (cos phi1) 2) (cos delta)))
1.0ms	theta	@	inf	(+ (* (sin phi1) (* (neg (cos phi1)) (* (cos theta) (sin delta)))) (* (pow (cos phi1) 2) (cos delta)))

simplify339.0ms (2.1%)

Memory

15.0MiB live, 528.7MiB allocated

Algorithm

1×	egg-herbie

Rules

14 040×	`lower-fma.f64`
14 040×	`lower-fma.f32`
7 456×	`lower-*.f64`
7 456×	`lower-*.f32`
4 108×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	490	19108
1	1633	18643
2	5590	18571
0	8155	17721

Stop Event

1×	iter limit
1×	node limit

Counts

816 → 806

Calls

Call 1

Inputs
(cos delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))
(+ (cos delta) (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (+ (* -1 (cos delta)) (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))))))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (cos delta) (pow (cos phi1) 2)))
(+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (+ (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2))))
(+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (+ (* (cos delta) (pow (cos phi1) 2)) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))))
(+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (+ (* (cos delta) (pow (cos phi1) 2)) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(pow (cos phi1) 2)
(+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (cos phi1) 2))
(+ (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* -1/2 (* delta (pow (cos phi1) 2))))) (pow (cos phi1) 2))
(+ (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (+ (* -1/2 (pow (cos phi1) 2)) (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))))) (pow (cos phi1) 2))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(* theta (* (cos phi1) (sin delta)))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* delta (* (cos phi1) (sin theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (sin delta) (sin theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(* theta (* (cos phi1) (sin delta)))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* delta (* (cos phi1) (sin theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (sin delta) (sin theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* delta (sin theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* theta (sin delta))
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(* theta (sin delta))
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* delta (sin theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
1
(+ 1 (* -1 (pow phi1 2)))
(+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))
(- 1/2 (* -1/2 (cos (* 2 phi1))))
(- 1/2 (* -1/2 (cos (* 2 phi1))))
(- 1/2 (* -1/2 (cos (* 2 phi1))))
(- 1/2 (* -1/2 (cos (* 2 phi1))))
(- 1/2 (* -1/2 (cos (* 2 phi1))))
(- 1/2 (* -1/2 (cos (* 2 phi1))))
(- 1/2 (* -1/2 (cos (* 2 phi1))))
(- 1/2 (* -1/2 (cos (* 2 phi1))))
(* -1 (pow phi1 2))
(* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1))
(* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1))
(* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* (pow phi1 2) (- (* 1/315 (pow phi1 2)) 2/45)))) 1))
(* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))
(* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))
(* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))
(* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))
(* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))
(* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))
(* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))
(* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
1
(+ 1 (* -1 (pow phi1 2)))
(+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))
(pow (cos phi1) 2)
(pow (cos phi1) 2)
(pow (cos phi1) 2)
(pow (cos phi1) 2)
(pow (cos phi1) 2)
(pow (cos phi1) 2)
(pow (cos phi1) 2)
(pow (cos phi1) 2)
(* -1 (* (cos theta) (sin delta)))
(+ (* -1 (* (cos theta) (sin delta))) (* 1/2 (* (pow phi1 2) (* (cos theta) (sin delta)))))
(+ (* -1 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/24 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* 1/2 (* (cos theta) (sin delta))))))
(+ (* -1 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/2 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/24 (* (cos theta) (sin delta))) (* 1/720 (* (pow phi1 2) (* (cos theta) (sin delta)))))))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (sin delta)))
(+ (* -1 (* (cos phi1) (sin delta))) (* 1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))))
(+ (* -1 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/2 (* (cos phi1) (sin delta))))))
(+ (* -1 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (sin delta))) (* 1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))))))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* delta (* (cos phi1) (cos theta))))
(* delta (+ (* -1 (* (cos phi1) (cos theta))) (* 1/6 (* (pow delta 2) (* (cos phi1) (cos theta))))))
(* delta (+ (* -1 (* (cos phi1) (cos theta))) (* (pow delta 2) (+ (* -1/120 (* (pow delta 2) (* (cos phi1) (cos theta)))) (* 1/6 (* (cos phi1) (cos theta)))))))
(* delta (+ (* -1 (* (cos phi1) (cos theta))) (* (pow delta 2) (+ (* 1/6 (* (cos phi1) (cos theta))) (* (pow delta 2) (+ (* -1/120 (* (cos phi1) (cos theta))) (* 1/5040 (* (pow delta 2) (* (cos phi1) (cos theta))))))))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(- 1 (pow (sin phi1) 2))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(cos delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- 1 (pow (sin phi1) 2))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(cos delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(cos delta)
(+ (cos delta) (* -1 (* (pow phi1 2) (cos delta))))
(+ (cos delta) (* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta))))
(+ (cos delta) (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (+ (* -1 (* (pow delta 2) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* 1/2 (cos (* 2 phi1)))))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- 1/24 (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- (+ 1/24 (* -1 (* (pow delta 2) (+ 1/720 (* -1/720 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))) (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(sin delta)
(+ (sin delta) (* -1/2 (* (pow phi1 2) (sin delta))))
(+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* 1/24 (* (pow phi1 2) (sin delta))))))
(+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin delta))) (* 1/24 (sin delta)))))))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* delta (cos phi1))
(* delta (+ (cos phi1) (* -1/6 (* (pow delta 2) (cos phi1)))))
(* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow delta 2) (cos phi1)))))))
(* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (cos phi1))) (* 1/120 (cos phi1))))))))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* -1 (* phi1 (cos theta)))
(* phi1 (+ (* -1 (cos theta)) (* 1/6 (* (pow phi1 2) (cos theta)))))
(* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1/120 (* (pow phi1 2) (cos theta))) (* 1/6 (cos theta))))))
(* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* 1/6 (cos theta)) (* (pow phi1 2) (+ (* -1/120 (cos theta)) (* 1/5040 (* (pow phi1 2) (cos theta)))))))))
(* -1 (* (cos theta) (sin phi1)))
(* -1 (* (cos theta) (sin phi1)))
(* -1 (* (cos theta) (sin phi1)))
(* -1 (* (cos theta) (sin phi1)))
(* -1 (* (cos theta) (sin phi1)))
(* -1 (* (cos theta) (sin phi1)))
(* -1 (* (cos theta) (sin phi1)))
(* -1 (* (cos theta) (sin phi1)))
(* -1 (sin phi1))
(+ (* -1 (sin phi1)) (* 1/2 (* (pow theta 2) (sin phi1))))
(+ (* -1 (sin phi1)) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (sin phi1))) (* 1/2 (sin phi1)))))
(+ (* -1 (sin phi1)) (* (pow theta 2) (+ (* 1/2 (sin phi1)) (* (pow theta 2) (+ (* -1/24 (sin phi1)) (* 1/720 (* (pow theta 2) (sin phi1))))))))
(* -1 (* (cos theta) (sin phi1)))
(* -1 (* (cos theta) (sin phi1)))
(* -1 (* (cos theta) (sin phi1)))
(* -1 (* (cos theta) (sin phi1)))
(* -1 (* (cos theta) (sin phi1)))
(* -1 (* (cos theta) (sin phi1)))
(* -1 (* (cos theta) (sin phi1)))
(* -1 (* (cos theta) (sin phi1)))
(pow phi1 2)
(* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))
(+ 1/2 (* -1/2 (cos (* 2 phi1))))
(+ 1/2 (* -1/2 (cos (* 2 phi1))))
(+ 1/2 (* -1/2 (cos (* 2 phi1))))
(+ 1/2 (* -1/2 (cos (* 2 phi1))))
(+ 1/2 (* -1/2 (cos (* 2 phi1))))
(+ 1/2 (* -1/2 (cos (* 2 phi1))))
(+ 1/2 (* -1/2 (cos (* 2 phi1))))
(+ 1/2 (* -1/2 (cos (* 2 phi1))))
1
(+ 1 (* -2 (pow phi1 2)))
(+ 1 (* (pow phi1 2) (- (* 2/3 (pow phi1 2)) 2)))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/3 (* -4/45 (pow phi1 2)))) 2)))
(cos (* 2 phi1))
(cos (* 2 phi1))
(cos (* 2 phi1))
(cos (* 2 phi1))
(cos (* 2 phi1))
(cos (* 2 phi1))
(cos (* 2 phi1))
(cos (* 2 phi1))

Outputs
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 phi1 (sin.f64 delta))))
(+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))
(-.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 phi1 phi1)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 phi1 (sin.f64 delta))))
(+ (cos delta) (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (+ (* -1 (cos delta)) (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))))))
(fma.f64 phi1 (fma.f64 (neg.f64 phi1) (fma.f64 phi1 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) #s(literal -2/3 binary64))) (cos.f64 delta)) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (cos.f64 delta))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(fma.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(fma.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(fma.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(fma.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(fma.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(fma.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(fma.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(fma.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))))
(+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (cos delta) (pow (cos phi1) 2)))
(fma.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))))
(+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (+ (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2))))
(fma.f64 (.f64 (sin.f64 delta) (.f64 (sin.f64 phi1) (cos.f64 phi1))) (+.f64 #s(literal -1 binary64) (.f64 #s(literal 1/2 binary64) (.f64 theta theta))) (*.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (+ (* (cos delta) (pow (cos phi1) 2)) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))))
(fma.f64 (.f64 theta theta) (.f64 (.f64 (sin.f64 delta) (.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 (.f64 theta theta) #s(literal -1/24 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))))
(+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (+ (* (cos delta) (pow (cos phi1) 2)) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))))
(+.f64 (fma.f64 (.f64 (sin.f64 delta) (.f64 (sin.f64 phi1) (cos.f64 phi1))) (+.f64 #s(literal -1 binary64) (.f64 #s(literal 1/2 binary64) (.f64 theta theta))) (.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (.f64 (sin.f64 delta) (.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 (.f64 theta theta) #s(literal 1/720 binary64) #s(literal -1/24 binary64))) (.f64 (.f64 theta theta) (*.f64 theta theta))))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(fma.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(fma.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(fma.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(fma.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(fma.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(fma.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(fma.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(fma.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))))
(pow (cos phi1) 2)
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (cos phi1) 2))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 (.f64 delta (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(+ (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* -1/2 (* delta (pow (cos phi1) 2))))) (pow (cos phi1) 2))
(fma.f64 delta (-.f64 (.f64 delta (.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(+ (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (+ (* -1/2 (pow (cos phi1) 2)) (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))))) (pow (cos phi1) 2))
(fma.f64 delta (fma.f64 delta (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (.f64 delta #s(literal 1/6 binary64)))) (neg.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(fma.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(fma.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(fma.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(fma.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(fma.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(fma.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(fma.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))))
(+ (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (cos phi1) 2)))
(fma.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(* theta (* (cos phi1) (sin delta)))
(.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(.f64 theta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(.f64 theta (fma.f64 (.f64 theta theta) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 (.f64 theta theta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 delta) (cos.f64 phi1))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(.f64 theta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 (.f64 theta theta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))) (.f64 (.f64 theta theta) (.f64 theta theta)))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* delta (* (cos phi1) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 delta (sin.f64 theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(.f64 delta (fma.f64 (.f64 delta delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 #s(literal 1/120 binary64) (.f64 delta delta) #s(literal -1/6 binary64))) (.f64 (cos.f64 phi1) (sin.f64 theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(.f64 delta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 theta)) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta delta) #s(literal 1/120 binary64))) (.f64 (.f64 delta delta) (.f64 delta delta)))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(fma.f64 (.f64 phi1 phi1) (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (.f64 phi1 phi1) (.f64 (.f64 phi1 phi1) (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(* theta (* (cos phi1) (sin delta)))
(.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(.f64 theta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(.f64 theta (fma.f64 (.f64 theta theta) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 (.f64 theta theta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 delta) (cos.f64 phi1))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(.f64 theta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 (.f64 theta theta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))) (.f64 (.f64 theta theta) (.f64 theta theta)))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* delta (* (cos phi1) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 delta (sin.f64 theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(.f64 delta (fma.f64 (.f64 delta delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 #s(literal 1/120 binary64) (.f64 delta delta) #s(literal -1/6 binary64))) (.f64 (cos.f64 phi1) (sin.f64 theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(.f64 delta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 theta)) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta delta) #s(literal 1/120 binary64))) (.f64 (.f64 delta delta) (.f64 delta delta)))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(fma.f64 (.f64 phi1 phi1) (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (.f64 phi1 phi1) (.f64 (.f64 phi1 phi1) (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(.f64 delta (fma.f64 (.f64 delta delta) (.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (.f64 delta delta) #s(literal -1/6 binary64))) (sin.f64 theta)))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(.f64 delta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta) (.f64 (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta delta) #s(literal 1/120 binary64))) (.f64 (.f64 delta delta) (.f64 delta delta)))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(.f64 theta (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(.f64 theta (fma.f64 (.f64 theta theta) (.f64 (sin.f64 delta) (fma.f64 (.f64 theta theta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (sin.f64 delta)))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(.f64 theta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta) (.f64 (.f64 (sin.f64 delta) (fma.f64 (.f64 theta theta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))) (.f64 (.f64 theta theta) (.f64 theta theta)))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)) (neg.f64 lambda1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(.f64 theta (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(.f64 theta (fma.f64 (.f64 theta theta) (.f64 (sin.f64 delta) (fma.f64 (.f64 theta theta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (sin.f64 delta)))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(.f64 theta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta) (.f64 (.f64 (sin.f64 delta) (fma.f64 (.f64 theta theta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))) (.f64 (.f64 theta theta) (.f64 theta theta)))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(.f64 delta (fma.f64 (.f64 delta delta) (.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (.f64 delta delta) #s(literal -1/6 binary64))) (sin.f64 theta)))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(.f64 delta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta) (.f64 (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta delta) #s(literal 1/120 binary64))) (.f64 (.f64 delta delta) (.f64 delta delta)))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(.f64 lambda1 (neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(.f64 lambda1 (neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(.f64 lambda1 (neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))) lambda1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (pow phi1 2)))
(-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))
(+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))
(fma.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) #s(literal 1/3 binary64) #s(literal -1 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))
(fma.f64 (.f64 phi1 phi1) (fma.f64 phi1 (.f64 phi1 (fma.f64 (*.f64 phi1 phi1) #s(literal -2/45 binary64) #s(literal 1/3 binary64))) #s(literal -1 binary64)) #s(literal 1 binary64))
(- 1/2 (* -1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(- 1/2 (* -1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(- 1/2 (* -1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(- 1/2 (* -1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(- 1/2 (* -1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(- 1/2 (* -1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(- 1/2 (* -1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(- 1/2 (* -1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(* -1 (pow phi1 2))
(neg.f64 (*.f64 phi1 phi1))
(* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1))
(.f64 (.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/3 binary64) #s(literal -1 binary64)))
(* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1))
(.f64 (.f64 phi1 phi1) (fma.f64 phi1 (.f64 phi1 (fma.f64 (.f64 phi1 phi1) #s(literal -2/45 binary64) #s(literal 1/3 binary64))) #s(literal -1 binary64)))
(* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* (pow phi1 2) (- (* 1/315 (pow phi1 2)) 2/45)))) 1))
(.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/315 binary64) #s(literal -2/45 binary64)) #s(literal 1/3 binary64)) #s(literal -1 binary64)))
(* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))
(* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))
(* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))
(* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))
(* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))
(* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))
(* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))
(* -1 (+ 1/2 (* -1/2 (cos (* 2 phi1)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(.f64 lambda1 (neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(.f64 lambda1 (neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(.f64 lambda1 (neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))) lambda1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1/2 (* -1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (pow phi1 2)))
(-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))
(+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))
(fma.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) #s(literal 1/3 binary64) #s(literal -1 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))
(fma.f64 (.f64 phi1 phi1) (fma.f64 phi1 (.f64 phi1 (fma.f64 (*.f64 phi1 phi1) #s(literal -2/45 binary64) #s(literal 1/3 binary64))) #s(literal -1 binary64)) #s(literal 1 binary64))
(pow (cos phi1) 2)
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow (cos phi1) 2)
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow (cos phi1) 2)
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow (cos phi1) 2)
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow (cos phi1) 2)
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow (cos phi1) 2)
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow (cos phi1) 2)
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow (cos phi1) 2)
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(* -1 (* (cos theta) (sin delta)))
(*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))
(+ (* -1 (* (cos theta) (sin delta))) (* 1/2 (* (pow phi1 2) (* (cos theta) (sin delta)))))
(.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi1 phi1) #s(literal -1 binary64)))
(+ (* -1 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/24 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* 1/2 (* (cos theta) (sin delta))))))
(fma.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)) (.f64 (.f64 phi1 phi1) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal -1/24 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)))))
(+ (* -1 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/2 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/24 (* (cos theta) (sin delta))) (* 1/720 (* (pow phi1 2) (* (cos theta) (sin delta)))))))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal 1/2 binary64) (.f64 phi1 phi1) #s(literal -1 binary64)) (.f64 (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal 1/720 binary64) (.f64 phi1 phi1) #s(literal -1/24 binary64))) (.f64 (.f64 phi1 phi1) (*.f64 phi1 phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))
(* -1 (* (cos phi1) (sin delta)))
(*.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))
(+ (* -1 (* (cos phi1) (sin delta))) (* 1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))))
(.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 theta theta) #s(literal -1 binary64)))
(+ (* -1 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/2 (* (cos phi1) (sin delta))))))
(fma.f64 (.f64 theta theta) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 (.f64 theta theta) #s(literal -1/24 binary64) #s(literal 1/2 binary64))) (*.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))
(+ (* -1 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (sin delta))) (* 1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))))))))
(fma.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (.f64 theta theta) #s(literal -1 binary64)) (.f64 (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 (.f64 theta theta) #s(literal 1/720 binary64) #s(literal -1/24 binary64))) (.f64 (.f64 theta theta) (*.f64 theta theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))
(* -1 (* delta (* (cos phi1) (cos theta))))
(.f64 (cos.f64 theta) (neg.f64 (.f64 delta (cos.f64 phi1))))
(* delta (+ (* -1 (* (cos phi1) (cos theta))) (* 1/6 (* (pow delta 2) (* (cos phi1) (cos theta))))))
(.f64 delta (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (fma.f64 #s(literal 1/6 binary64) (.f64 delta delta) #s(literal -1 binary64))))
(* delta (+ (* -1 (* (cos phi1) (cos theta))) (* (pow delta 2) (+ (* -1/120 (* (pow delta 2) (* (cos phi1) (cos theta)))) (* 1/6 (* (cos phi1) (cos theta)))))))
(.f64 delta (fma.f64 (.f64 delta delta) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (fma.f64 (.f64 delta delta) #s(literal -1/120 binary64) #s(literal 1/6 binary64))) (.f64 (cos.f64 phi1) (neg.f64 (cos.f64 theta)))))
(* delta (+ (* -1 (* (cos phi1) (cos theta))) (* (pow delta 2) (+ (* 1/6 (* (cos phi1) (cos theta))) (* (pow delta 2) (+ (* -1/120 (* (cos phi1) (cos theta))) (* 1/5040 (* (pow delta 2) (* (cos phi1) (cos theta))))))))))
(.f64 delta (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (fma.f64 #s(literal 1/6 binary64) (.f64 delta delta) #s(literal -1 binary64)) (.f64 (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (fma.f64 (.f64 delta delta) #s(literal 1/5040 binary64) #s(literal -1/120 binary64))) (.f64 (.f64 delta delta) (.f64 delta delta)))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))
(- 1 (pow (sin phi1) 2))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 (.f64 delta (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 delta (-.f64 (.f64 delta (.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 delta (fma.f64 delta (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (.f64 delta #s(literal 1/6 binary64)))) (neg.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 phi1 (sin.f64 delta))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(-.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 phi1 phi1)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 phi1 (sin.f64 delta))))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 phi1 (fma.f64 (neg.f64 phi1) (fma.f64 phi1 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) #s(literal -2/3 binary64))) (cos.f64 delta)) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))) (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 theta theta)) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 delta)))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(-.f64 (fma.f64 (.f64 theta theta) (.f64 (.f64 (sin.f64 delta) (.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 (.f64 theta theta) #s(literal -1/24 binary64) #s(literal 1/2 binary64))) (cos.f64 delta)) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (.f64 theta theta) (fma.f64 (.f64 theta theta) (.f64 (.f64 (sin.f64 delta) (.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 (.f64 theta theta) #s(literal 1/720 binary64) #s(literal -1/24 binary64))) (.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- 1 (pow (sin phi1) 2))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 (.f64 delta (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 delta (-.f64 (.f64 delta (.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 delta (fma.f64 delta (fma.f64 #s(literal -1/2 binary64) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (.f64 delta #s(literal 1/6 binary64)))) (neg.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 phi1 (sin.f64 delta))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(-.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 phi1 phi1)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 phi1 (sin.f64 delta))))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 phi1 (fma.f64 (neg.f64 phi1) (fma.f64 phi1 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) #s(literal -2/3 binary64))) (cos.f64 delta)) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))) (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 theta theta)) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 delta)))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(-.f64 (fma.f64 (.f64 theta theta) (.f64 (.f64 (sin.f64 delta) (.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 (.f64 theta theta) #s(literal -1/24 binary64) #s(literal 1/2 binary64))) (cos.f64 delta)) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (.f64 theta theta) (fma.f64 (.f64 theta theta) (.f64 (.f64 (sin.f64 delta) (.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 (.f64 theta theta) #s(literal 1/720 binary64) #s(literal -1/24 binary64))) (.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* (pow phi1 2) (cos delta))))
(.f64 (-.f64 #s(literal 1 binary64) (.f64 phi1 phi1)) (cos.f64 delta))
(+ (cos delta) (* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta))))
(fma.f64 (.f64 phi1 phi1) (.f64 (cos.f64 delta) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/3 binary64) #s(literal -1 binary64))) (cos.f64 delta))
(+ (cos delta) (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta))))
(fma.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (.f64 (cos.f64 delta) (fma.f64 (*.f64 phi1 phi1) #s(literal -2/45 binary64) #s(literal 1/3 binary64)))) (cos.f64 delta)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1 (* (pow delta 2) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* 1/2 (cos (* 2 phi1)))))
(fma.f64 (.f64 delta delta) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- 1/24 (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))))
(fma.f64 (.f64 delta delta) (fma.f64 (.f64 delta delta) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 1/24 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- (+ 1/24 (* -1 (* (pow delta 2) (+ 1/720 (* -1/720 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))) (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))))
(fma.f64 (.f64 delta delta) (fma.f64 (.f64 delta delta) (fma.f64 (fma.f64 #s(literal -1/720 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 1/720 binary64)) (.f64 delta (neg.f64 delta)) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 1/24 binary64))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (cos.f64 delta))
(sin delta)
(sin.f64 delta)
(+ (sin delta) (* -1/2 (* (pow phi1 2) (sin delta))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 delta))
(+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* 1/24 (* (pow phi1 2) (sin delta))))))
(fma.f64 (.f64 phi1 phi1) (.f64 (sin.f64 delta) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (sin.f64 delta))
(+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin delta))) (* 1/24 (sin delta)))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 delta) (.f64 (.f64 (sin.f64 delta) (fma.f64 (.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (.f64 (.f64 phi1 phi1) (*.f64 phi1 phi1))))
(* (cos phi1) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(* (cos phi1) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(* (cos phi1) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(* (cos phi1) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(* (cos phi1) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(* (cos phi1) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(* (cos phi1) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(* (cos phi1) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(* delta (cos phi1))
(*.f64 delta (cos.f64 phi1))
(* delta (+ (cos phi1) (* -1/6 (* (pow delta 2) (cos phi1)))))
(.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (cos.f64 phi1)))
(* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow delta 2) (cos phi1)))))))
(.f64 delta (fma.f64 (.f64 delta delta) (.f64 (cos.f64 phi1) (fma.f64 #s(literal 1/120 binary64) (.f64 delta delta) #s(literal -1/6 binary64))) (cos.f64 phi1)))
(* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (cos phi1))) (* 1/120 (cos phi1))))))))
(.f64 delta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta delta) #s(literal 1/120 binary64))) (.f64 (.f64 delta delta) (.f64 delta delta)))))
(* (cos phi1) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(* (cos phi1) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(* (cos phi1) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(* (cos phi1) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(* (cos phi1) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(* (cos phi1) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(* (cos phi1) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(* (cos phi1) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(* -1 (* phi1 (cos theta)))
(neg.f64 (*.f64 phi1 (cos.f64 theta)))
(* phi1 (+ (* -1 (cos theta)) (* 1/6 (* (pow phi1 2) (cos theta)))))
(.f64 phi1 (.f64 (cos.f64 theta) (fma.f64 #s(literal 1/6 binary64) (*.f64 phi1 phi1) #s(literal -1 binary64))))
(* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1/120 (* (pow phi1 2) (cos theta))) (* 1/6 (cos theta))))))
(.f64 phi1 (fma.f64 (.f64 phi1 phi1) (.f64 (cos.f64 theta) (fma.f64 (.f64 phi1 phi1) #s(literal -1/120 binary64) #s(literal 1/6 binary64))) (neg.f64 (cos.f64 theta))))
(* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* 1/6 (cos theta)) (* (pow phi1 2) (+ (* -1/120 (cos theta)) (* 1/5040 (* (pow phi1 2) (cos theta)))))))))
(.f64 phi1 (fma.f64 (cos.f64 theta) (fma.f64 #s(literal 1/6 binary64) (.f64 phi1 phi1) #s(literal -1 binary64)) (.f64 (.f64 (cos.f64 theta) (fma.f64 (.f64 phi1 phi1) #s(literal 1/5040 binary64) #s(literal -1/120 binary64))) (.f64 (.f64 phi1 phi1) (.f64 phi1 phi1)))))
(* -1 (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))
(* -1 (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))
(* -1 (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))
(* -1 (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))
(* -1 (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))
(* -1 (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))
(* -1 (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))
(* -1 (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))
(* -1 (sin phi1))
(neg.f64 (sin.f64 phi1))
(+ (* -1 (sin phi1)) (* 1/2 (* (pow theta 2) (sin phi1))))
(.f64 (sin.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (.f64 theta theta) #s(literal -1 binary64)))
(+ (* -1 (sin phi1)) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (sin phi1))) (* 1/2 (sin phi1)))))
(-.f64 (.f64 (.f64 theta theta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 theta theta) #s(literal -1/24 binary64) #s(literal 1/2 binary64)))) (sin.f64 phi1))
(+ (* -1 (sin phi1)) (* (pow theta 2) (+ (* 1/2 (sin phi1)) (* (pow theta 2) (+ (* -1/24 (sin phi1)) (* 1/720 (* (pow theta 2) (sin phi1))))))))
(fma.f64 (sin.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (.f64 theta theta) #s(literal -1 binary64)) (.f64 (.f64 theta theta) (.f64 (.f64 theta theta) (.f64 (sin.f64 phi1) (fma.f64 (*.f64 theta theta) #s(literal 1/720 binary64) #s(literal -1/24 binary64))))))
(* -1 (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))
(* -1 (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))
(* -1 (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))
(* -1 (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))
(* -1 (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))
(* -1 (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))
(* -1 (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))
(* -1 (* (cos theta) (sin phi1)))
(*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))
(pow phi1 2)
(*.f64 phi1 phi1)
(* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))
(.f64 phi1 (.f64 phi1 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/3 binary64) #s(literal 1 binary64))))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))
(.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))
(.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (fma.f64 phi1 (.f64 phi1 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/315 binary64) #s(literal 2/45 binary64))) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(+ 1/2 (* -1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -2 (pow phi1 2)))
(fma.f64 phi1 (*.f64 phi1 #s(literal -2 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow phi1 2) (- (* 2/3 (pow phi1 2)) 2)))
(fma.f64 (.f64 phi1 phi1) (fma.f64 phi1 (.f64 phi1 #s(literal 2/3 binary64)) #s(literal -2 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/3 (* -4/45 (pow phi1 2)))) 2)))
(fma.f64 phi1 (.f64 phi1 (fma.f64 (.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -4/45 binary64) #s(literal 2/3 binary64)) #s(literal -2 binary64))) #s(literal 1 binary64))
(cos (* 2 phi1))
(cos.f64 (*.f64 phi1 #s(literal 2 binary64)))
(cos (* 2 phi1))
(cos.f64 (*.f64 phi1 #s(literal 2 binary64)))
(cos (* 2 phi1))
(cos.f64 (*.f64 phi1 #s(literal 2 binary64)))
(cos (* 2 phi1))
(cos.f64 (*.f64 phi1 #s(literal 2 binary64)))
(cos (* 2 phi1))
(cos.f64 (*.f64 phi1 #s(literal 2 binary64)))
(cos (* 2 phi1))
(cos.f64 (*.f64 phi1 #s(literal 2 binary64)))
(cos (* 2 phi1))
(cos.f64 (*.f64 phi1 #s(literal 2 binary64)))
(cos (* 2 phi1))
(cos.f64 (*.f64 phi1 #s(literal 2 binary64)))

rewrite534.0ms (3.3%)

Memory

5.0MiB live, 560.3MiB allocated

Rules

6 386×	`lower-fma.f32`
6 380×	`lower-fma.f64`
5 652×	`lower-*.f32`
5 624×	`lower-*.f64`
2 584×	`lower-+.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	88	612
0	139	608
1	487	549
2	3336	549
0	8955	541

Stop Event

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

Counts

26 → 655

Calls

Call 1

Inputs
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))
(+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
#s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
#s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(cos.f64 (*.f64 phi1 #s(literal 2 binary64)))

Outputs
(+.f64 (cos.f64 delta) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 (cos.f64 delta) (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(+.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))
(+.f64 (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(+.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (cos.f64 delta))
(+.f64 (fma.f64 (cos.f64 theta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 delta)) (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(literal 2 binary64)) (-.f64 (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (/.f64 (pow.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(-.f64 (/.f64 (pow.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (fma.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (pow.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (fma.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (pow.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (fma.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (/.f64 (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(literal 2 binary64)) (fma.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(fma.f64 (sin.f64 phi1) (neg.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 delta)) (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))
(fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (neg.f64 (cos.f64 phi1)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (sin.f64 phi1)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (neg.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)))) (sin.f64 phi1) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 (cos.f64 delta) (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(fma.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta))) (neg.f64 (sin.f64 phi1)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal -1 binary64) (+.f64 (cos.f64 delta) (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (+.f64 (cos.f64 delta) (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (cos.f64 delta) (+.f64 (cos.f64 delta) (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))) (neg.f64 (cos.f64 theta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))
(fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 delta) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (+.f64 (cos.f64 delta) (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta)))) (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(fma.f64 (neg.f64 (cos.f64 theta)) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 delta) (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 theta)) (neg.f64 (.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (neg.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (cos.f64 theta) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (neg.f64 (cos.f64 theta)) (.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 delta) (cos.f64 phi1)) (cos.f64 phi1) (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 phi1) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (sin.f64 phi1))) (cos.f64 theta) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta))) (neg.f64 (cos.f64 phi1)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta))) (sin.f64 delta) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))))) (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(literal 3 binary64)) (pow.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(literal 2 binary64)) (pow.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (fma.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (pow.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(literal 3 binary64)) (pow.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))))) (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(literal 3 binary64)) (pow.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (fma.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (pow.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(literal 3 binary64)) (pow.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(literal 2 binary64)) (pow.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(literal 3 binary64)) (pow.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))))) (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(literal 3 binary64)) (pow.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (fma.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (pow.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(literal 2 binary64)) (pow.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (cos.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(literal 2 binary64))) (fma.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))
(/.f64 (-.f64 (pow.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(literal 2 binary64))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (cos.f64 delta)))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (.f64 (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) #s(literal 2 binary64)))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta)))))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) #s(literal 2 binary64)))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) #s(literal 2 binary64)))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (.f64 (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))))) (.f64 (/.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) #s(literal 2 binary64)))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta)))))) (.f64 (/.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) #s(literal 2 binary64)))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))))) (.f64 (/.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) #s(literal 2 binary64) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (.f64 (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))))) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) #s(literal 2 binary64) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta)))))) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) #s(literal 2 binary64) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))))) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) #s(literal 2 binary64) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (.f64 (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))))) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) #s(literal 2 binary64) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta)))))) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) #s(literal 2 binary64) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))))) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) #s(literal 2 binary64) (.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta))) (.f64 (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))))) (.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) #s(literal 2 binary64) (.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta))) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta)))))) (.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) #s(literal 2 binary64) (.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta))) (.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))))) (.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) #s(literal 2 binary64) (.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (.f64 (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))))) (.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) #s(literal 2 binary64) (.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta)))))) (.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) #s(literal 2 binary64) (.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))))) (.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) #s(literal 2 binary64) (.f64 (neg.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta)))) (.f64 (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))))) (.f64 (neg.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) #s(literal 2 binary64) (.f64 (neg.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta)))) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta)))))) (.f64 (neg.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) #s(literal 2 binary64) (.f64 (neg.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta)))) (.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))))) (.f64 (neg.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64) (.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))))) (.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64) (.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta)))))) (.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64) (.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))))) (.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (cos.f64 delta) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))))) (*.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (cos.f64 delta) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta)))))) (*.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (cos.f64 delta) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))))) (*.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (cos.f64 delta) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) #s(literal 2 binary64) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (.f64 (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (cos.f64 delta) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) #s(literal 2 binary64) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta)))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (cos.f64 delta) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) #s(literal 2 binary64) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (cos.f64 delta)) #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))))) (*.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (cos.f64 delta)) #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta)))))) (*.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (cos.f64 delta)) #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))))) (*.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64)) (cos.f64 delta)) #s(literal 2 binary64) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (.f64 (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64)) (cos.f64 delta)) #s(literal 2 binary64) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta)))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64)) (cos.f64 delta)) #s(literal 2 binary64) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))) (/.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta))) (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta)))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))) (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))))) (.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))) (neg.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta)))) (.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (.f64 #s(literal 2 binary64) (neg.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta))))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))) (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (.f64 #s(literal 2 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))) (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 delta) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))))) (*.f64 #s(literal 2 binary64) (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 delta) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))) (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (cos.f64 delta)))) (*.f64 #s(literal 2 binary64) (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64)) (cos.f64 delta)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta)))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))))
(/.f64 (fma.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta)))) (/.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (fma.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta)))) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))))
(/.f64 (fma.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta)))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))))
(/.f64 (fma.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta)))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta))) (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta)))))
(/.f64 (fma.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta)))) (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))))) (.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))))
(/.f64 (fma.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta)))) (neg.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta)))) (.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (.f64 #s(literal 2 binary64) (neg.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta))))))
(/.f64 (fma.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta)))) (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (.f64 #s(literal 2 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))))
(/.f64 (fma.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta)))) (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 delta) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))))) (*.f64 #s(literal 2 binary64) (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 delta) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta)))) (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (cos.f64 delta)))) (*.f64 #s(literal 2 binary64) (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64)) (cos.f64 delta)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))))
(/.f64 (fma.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))))
(/.f64 (fma.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) (/.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))
(/.f64 (fma.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))))
(/.f64 (fma.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))))
(/.f64 (fma.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta))) (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta)))))
(/.f64 (fma.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))))) (.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))))
(/.f64 (fma.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) (neg.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta)))) (.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (.f64 #s(literal 2 binary64) (neg.f64 (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta))))))
(/.f64 (fma.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (.f64 #s(literal 2 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))))
(/.f64 (fma.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 delta) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))))) (*.f64 #s(literal 2 binary64) (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (fma.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 delta) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))))
(/.f64 (fma.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (cos.f64 delta)))) (*.f64 #s(literal 2 binary64) (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (fma.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64)) (cos.f64 delta)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))))
(pow.f64 (/.f64 (fma.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))))) (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(literal 3 binary64)) (pow.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(literal 2 binary64)) (pow.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (fma.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (pow.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (-.f64 (pow.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (+.f64 (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(literal 3 binary64)) (pow.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))))) (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(literal 2 binary64)))))
(.f64 (+.f64 (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(literal 3 binary64)) (pow.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (fma.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))) (pow.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))))
(.f64 (-.f64 (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(literal 2 binary64)) (pow.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(.f64 (-.f64 (pow.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))) lambda1)
(-.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))))) (/.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))) (-.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))) (-.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))))))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))))))))
(/.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))) (-.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))) lambda1))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))) (-.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))) (-.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))) lambda1) (*.f64 lambda1 lambda1))))
(.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (sin.f64 theta) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (sin.f64 theta)) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1)) #s(literal 2 binary64))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(.f64 (sin.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)))
(.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))))
(+.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) lambda1)
(-.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))))) (/.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta)))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta)))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta)))))
(/.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) lambda1))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta)))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))))))
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(-.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta)))))
(/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta)))) #s(literal -2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta)))) #s(literal -1 binary64))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 1/2 binary64))
(*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))) #s(literal 1/2 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1)
(-.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) (/.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (-.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (-.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (-.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (-.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (-.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1) (*.f64 lambda1 lambda1))))
(.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(-.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta)))))
(/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta)))) #s(literal -2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta)))) #s(literal -1 binary64))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 1/2 binary64))
(*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))) #s(literal 1/2 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) lambda1)
(-.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))) (/.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (-.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (-.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))))
(/.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (-.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) lambda1))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (-.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (-.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) lambda1) (*.f64 lambda1 lambda1))))
(.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) #s(literal -1/2 binary64))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (cos.f64 phi1))))
(exp.f64 (*.f64 (log.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(exp.f64 (+.f64 (log.f64 (cos.f64 phi1)) (log.f64 (cos.f64 phi1))))
(-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(-.f64 #s(literal 0 binary64) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(-.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (neg.f64 (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal -1 binary64) #s(literal 1 binary64))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (neg.f64 (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))))
(/.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(*.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))))
(*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64))
(+.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
(+.f64 #s(literal -1/2 binary64) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1 binary64)))
(+.f64 #s(literal 0 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1 binary64)) #s(literal -1/2 binary64))
(-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(-.f64 #s(literal -1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
(-.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (neg.f64 (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1 binary64) #s(literal -1/2 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64))
(fma.f64 (neg.f64 (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64) #s(literal -1/2 binary64))
(neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(neg.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64)) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal -1/8 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/4 binary64) (.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64)))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (*.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))
(/.f64 (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(/.f64 (.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal -1 binary64))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(.f64 #s(literal -1 binary64) (.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) #s(literal -1/2 binary64))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (cos.f64 phi1))))
(exp.f64 (*.f64 (log.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(exp.f64 (+.f64 (log.f64 (cos.f64 phi1)) (log.f64 (cos.f64 phi1))))
(-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(-.f64 #s(literal 0 binary64) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(-.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (neg.f64 (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal -1 binary64) #s(literal 1 binary64))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (neg.f64 (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))))
(/.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(*.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(*.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))))
(*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(-.f64 #s(literal 0 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta))))
(neg.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta))))
(/.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta))) (neg.f64 (cos.f64 phi1))) #s(literal 2 binary64))
(.f64 (cos.f64 phi1) (neg.f64 (.f64 (cos.f64 theta) (sin.f64 delta))))
(.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)))
(.f64 (cos.f64 theta) (neg.f64 (.f64 (cos.f64 phi1) (sin.f64 delta))))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))
(.f64 (sin.f64 delta) (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)))
(.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 (cos.f64 phi1)))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))
(.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(.f64 (neg.f64 (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)))
(.f64 (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta))
(.f64 (neg.f64 (.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 phi1))
(.f64 (neg.f64 (.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta))
(.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta))
(.f64 (.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal -1 binary64)) (cos.f64 phi1))
#s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))
#s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
#s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))))
(/.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))) #s(literal -2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))) #s(literal -1 binary64))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(*.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) #s(literal 1/2 binary64))
(-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(neg.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(*.f64 (sin.f64 phi1) (neg.f64 (cos.f64 theta)))
(*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta))
(.f64 #s(literal -1 binary64) (.f64 (sin.f64 phi1) (cos.f64 theta)))
(.f64 (.f64 (cos.f64 theta) #s(literal -1 binary64)) (sin.f64 phi1))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 phi1)) #s(literal 2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
(-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(-.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(fma.f64 (neg.f64 (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))))
(/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow.f64 (neg.f64 (sin.f64 phi1)) #s(literal 2 binary64))
(pow.f64 (/.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))) #s(literal -1 binary64))
(*.f64 (sin.f64 phi1) (sin.f64 phi1))
(*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)))
(.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))
(.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)))
(cos.f64 (*.f64 phi1 #s(literal 2 binary64)))
(cos.f64 (+.f64 phi1 phi1))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)))
(fma.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(fma.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)))
(fma.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(fma.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)))
(fma.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(fma.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) #s(literal 1 binary64)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)))
(fma.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(fma.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) #s(literal 1 binary64)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)))
(fma.f64 (pow.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(fma.f64 (pow.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (neg.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64)))) (*.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64)) (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64)))) (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))))) (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))) (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64))))) (*.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))))) (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64)))) (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal -1/8 binary64)))) (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))))) (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))) (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64))))) (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))))) (*.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (neg.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64)))) (*.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64)) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64)))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64))))) (*.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64)))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal -1/8 binary64)))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64))))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))))) (*.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (neg.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (neg.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(/.f64 (fma.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (fma.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64)))) (*.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (fma.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64)) (.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64)))) (.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))))) (.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))) (.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))
(/.f64 (fma.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64))))) (*.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))))) (.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64)))) (.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal -1/8 binary64)))) (.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64))))))
(/.f64 (fma.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(/.f64 (fma.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))))) (.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))) (.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))
(/.f64 (fma.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64))))) (.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))))) (*.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (neg.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (neg.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(/.f64 (fma.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (fma.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (fma.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64)))) (.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))))) (.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))
(/.f64 (fma.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64))))) (*.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))))) (.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64)))) (.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal -1/8 binary64)))) (.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64))))))
(/.f64 (fma.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(/.f64 (fma.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))))) (.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))
(/.f64 (fma.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64))))) (.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))))) (*.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64)) (neg.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (neg.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64)) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64)) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64)) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal -1/8 binary64)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64))))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64)) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64)) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(/.f64 (fma.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (fma.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (fma.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (-.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))) (.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))
(/.f64 (fma.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64))))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal -1/8 binary64)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64))))))
(/.f64 (fma.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(/.f64 (fma.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))) (.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))
(/.f64 (fma.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (neg.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (.f64 #s(literal 2 binary64) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64)))) (*.f64 #s(literal 2 binary64) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64)) (.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64)))) (.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))))) (.f64 #s(literal 2 binary64) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))) (.f64 #s(literal 2 binary64) (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 #s(literal 2 binary64) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))))) (.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal -1/8 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64))))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (.f64 #s(literal 2 binary64) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))))) (.f64 #s(literal 2 binary64) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))) (.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 #s(literal 2 binary64) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 #s(literal 2 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64))))) (.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (neg.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (neg.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(/.f64 (fma.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (fma.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64)))) (*.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (-.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64)) (.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64)))) (.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))))) (.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))) (.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))
(/.f64 (fma.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64))))) (*.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))))) (.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64)))) (.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal -1/8 binary64)))) (.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64))))))
(/.f64 (fma.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(/.f64 (fma.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))))) (.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))) (.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))
(/.f64 (fma.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64))))) (.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))))) (*.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (neg.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (neg.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64)))) (*.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (-.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64)) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64)))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64))))) (*.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64)))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal -1/8 binary64)))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64))))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64))))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal -1 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))))) (*.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -3/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (neg.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(/.f64 (fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64)))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64)) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64)))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))
(/.f64 (fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64)))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal -1/8 binary64)))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64))))))
(/.f64 (fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(/.f64 (fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))
(/.f64 (fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi1 phi1))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (neg.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (neg.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))))))
(/.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64)))) (*.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))))) (.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))
(/.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))))) (.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal -1/8 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal -1/2 binary64))))))
(/.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(/.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/4 binary64)))))
(/.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1/4 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64))))))))))) (*.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(*.f64 (+.f64 (cos.f64 phi1) (sin.f64 phi1)) (-.f64 (cos.f64 phi1) (sin.f64 phi1)))

eval382.0ms (2.3%)

Memory: 32.8MiB live, 492.6MiB allocated
Compiler: Compiled 74 533 to 4 699 computations (93.7% saved)

prune457.0ms (2.8%)

Memory

-14.2MiB live, 814.9MiB allocated

Pruning

47 alts after pruning (43 fresh and 4 done)

	Pruned	Kept	Total
New	1 660	30	1 690
Fresh	17	13	30
Picked	2	3	5
Done	0	1	1
Total	1 679	47	1 726

Accuracy

100.0%

Counts

1 726 → 47

Alt Table

Click to see full alt table

Status	Accuracy	Program
	57.2%	(/.f64 (-.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) lambda1))
	42.4%	(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 3 binary64)))))
	80.3%	(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1)
	99.3%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))))))
	99.3%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
	82.0%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
✓	89.4%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
	89.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) #s(approx ( (cos phi1) (sin delta)) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
	89.3%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (cos theta)) (neg.f64 (sin.f64 phi1))) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
	92.9%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
	94.3%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (cos.f64 phi1) (.f64 (cos.f64 delta) (sin.f64 phi1))))))))
	99.3%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta)))) (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))))
	99.4%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))))
▶	99.4%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))))
✓	99.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))))
	94.4%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))))
▶	92.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))))
	39.2%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
	94.4%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
	70.4%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))))
	77.5%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) #s(literal 1 binary64)))))
	82.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (+ (* (sin phi1) (* (neg (cos phi1)) (* (cos theta) (sin delta)))) (* (pow (cos phi1) 2) (cos delta))) (fma.f64 (.f64 (sin.f64 delta) (.f64 (sin.f64 phi1) (cos.f64 phi1))) (+.f64 #s(literal -1 binary64) (.f64 #s(literal 1/2 binary64) (.f64 theta theta))) (*.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))))
	80.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
✓	89.2%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	80.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
	74.3%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	76.4%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
	76.5%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))))
	73.1%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 1/2 binary64))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
▶	69.3%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
▶	87.1%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
	87.6%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))))
	77.1%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
	87.5%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))))
	83.7%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 phi1 (sin.f64 delta)))))))
✓	87.0%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	72.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 theta (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	72.9%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 theta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1))))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
	75.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 theta))))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
	71.3%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 theta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	72.2%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	73.1%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
▶	74.4%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	57.0%	(.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))))))
	30.9%	#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
	99.3%	#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))) lambda1) lambda1))
	30.9%	#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))))

Compiler

Compiled 2 809 to 1 695 computations (39.7% saved)

simplify345.0ms (2.1%)

Memory

17.0MiB live, 432.7MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score	Program
cost-diff	0	(*.f64 (sin.f64 theta) (sin.f64 delta))
cost-diff	0	(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
cost-diff	0	(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
cost-diff	0	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))))
cost-diff	0	(*.f64 (sin.f64 delta) (sin.f64 theta))
cost-diff	0	#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
cost-diff	0	(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))
cost-diff	0	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
cost-diff	0	(.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))
cost-diff	0	#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))))
cost-diff	0	(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
cost-diff	0	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
cost-diff	0	#s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))
cost-diff	0	#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))))
cost-diff	0	(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
cost-diff	0	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
cost-diff	0	(*.f64 (sin.f64 theta) (sin.f64 delta))
cost-diff	0	(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
cost-diff	0	(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
cost-diff	0	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))))

Rules

20 418×	`lower-fma.f32`
20 410×	`lower-fma.f64`
3 200×	`lower-+.f32`
3 188×	`lower-+.f64`
3 186×	`lower--.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	86	989
0	138	989
1	232	985
2	409	981
3	888	969
4	1690	969
5	2513	969
6	3742	960
7	4562	942
8	5378	942
9	5582	942
10	5747	942
11	5826	942
0	8127	939

Stop Event

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

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
#s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1))
(neg.f64 (sin.f64 phi1))
(sin.f64 phi1)
(*.f64 (cos.f64 theta) (sin.f64 delta))
(cos.f64 theta)
(*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(cos.f64 (+.f64 phi1 phi1))
(+.f64 phi1 phi1)
(cos.f64 delta)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
lambda1
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))))
#s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))
(*.f64 delta (sin.f64 theta))
delta
(sin.f64 theta)
theta
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
(cos.f64 delta)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
lambda1
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))))
(.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))
(sin.f64 delta)
delta
(*.f64 theta (cos.f64 phi1))
theta
(cos.f64 phi1)
phi1
#s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
#s(literal 2 binary64)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
lambda1
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(sin.f64 delta)
delta
(sin.f64 theta)
theta
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta))
(neg.f64 (sin.f64 phi1))
(sin.f64 phi1)
phi1
(cos.f64 theta)
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(cos.f64 phi1)
#s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))
(cos.f64 delta)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
#s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(sin.f64 phi1)
#s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta))))
(*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))
(cos.f64 theta)
(neg.f64 (sin.f64 delta))
(*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
#s(literal 2 binary64)
(cos.f64 delta)

Outputs
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
#s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))
#s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))
(neg.f64 (sin.f64 phi1))
(sin.f64 phi1)
(*.f64 (cos.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(cos.f64 theta)
(*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))
(*.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(cos.f64 (+.f64 phi1 phi1))
(+.f64 phi1 phi1)
(cos.f64 delta)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
lambda1
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 (sin.f64 theta) delta)))
#s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))
#s(approx (* (sin delta) (sin theta)) (*.f64 (sin.f64 theta) delta))
(*.f64 delta (sin.f64 theta))
(*.f64 (sin.f64 theta) delta)
delta
(sin.f64 theta)
theta
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
(cos.f64 delta)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 theta (.f64 (sin.f64 delta) (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
lambda1
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 theta (.f64 (sin.f64 delta) (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 theta (.f64 (sin.f64 delta) (cos.f64 phi1))))
(.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))
(.f64 theta (.f64 (sin.f64 delta) (cos.f64 phi1)))
(sin.f64 delta)
delta
(*.f64 theta (cos.f64 phi1))
theta
(cos.f64 phi1)
phi1
#s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
#s(literal 2 binary64)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
lambda1
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 delta)
delta
(sin.f64 theta)
theta
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))
(-.f64 #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta))
(neg.f64 (sin.f64 phi1))
(sin.f64 phi1)
phi1
(cos.f64 theta)
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(cos.f64 phi1)
#s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))
(cos.f64 delta)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
#s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
#s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(sin.f64 phi1)
#s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta))))
(*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))
(cos.f64 theta)
(neg.f64 (sin.f64 delta))
(*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))
(*.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
#s(literal 2 binary64)
(cos.f64 delta)

localize355.0ms (2.2%)

Memory

3.7MiB live, 514.1MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.15234375	(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
accuracy	0.19921875	(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy	0.27572250976844204	(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
accuracy	27.22826661860502	#s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta))))
accuracy	0.1953125	(*.f64 (cos.f64 phi1) (sin.f64 delta))
accuracy	0.19921875	(*.f64 (sin.f64 delta) (sin.f64 theta))
accuracy	23.647935739802772	#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
accuracy	25.097028800215387	#s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))
accuracy	0.203125	(.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))
accuracy	0.27572250976844204	(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
accuracy	27.25727532979405	#s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
accuracy	30.294766956320082	#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))))
accuracy	0.13738251953688402	(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
accuracy	23.647935739802772	#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))))
accuracy	25.822557653006072	#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
accuracy	29.89517853183239	#s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))
accuracy	0.19921875	(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy	0.201503759768442	(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1))
accuracy	0.24219257867903557	(cos.f64 (+.f64 phi1 phi1))
accuracy	0.42435958121266476	(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))

Samples

161.0ms

256×

valid

Compiler

Compiled 719 to 68 computations (90.5% saved)

Precisions

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

ival-mult: 44.0ms (34.6% of total)

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

ival-sin: 20.0ms (15.7% of total)

ival-add: 11.0ms (8.6% of total)

ival-atan2: 6.0ms (4.7% of total)

ival-asin: 4.0ms (3.1% of total)

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

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

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

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

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

exact: 0.0ms (0% of total)

series99.0ms (0.6%)

Memory

21.3MiB live, 198.6MiB allocated

Counts

27 → 876

Calls

Call 1

Inputs
#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())
#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())
#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())
#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())
#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())
#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())
#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #<representation binary64>) () ())
#s(alt (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) (patch (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())
#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())
#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())
#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())
#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (cos.f64 (+.f64 phi1 phi1)) (patch (cos.f64 (+.f64 phi1 phi1)) #<representation binary64>) () ())
#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) #<representation binary64>) () ())
#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())
#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())
#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())
#s(alt #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (patch #s(approx ( (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) #<representation binary64>) () ())

Outputs
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta)))) (taylor 0 theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta)))))))) (taylor 0 theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta))))))))) (taylor 0 theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (sin theta))) (taylor 0 delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta)))) (taylor 0 delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta)))))))) (taylor 0 delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta))))))))) (taylor 0 delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor 0 phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta))) (taylor 0 phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta))))))) (taylor 0 phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta)))))))) (taylor 0 phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (patch (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta))))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta)))))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor 0 delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta))))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta))))))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta)))))))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (sin.f64 delta)) (patch (.f64 (sin.f64 theta) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta)))) (taylor 0 theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta)))))))) (taylor 0 theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta))))))))) (taylor 0 theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (sin theta))) (taylor 0 delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta)))) (taylor 0 delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta)))))))) (taylor 0 delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta))))))))) (taylor 0 delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor 0 phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta))) (taylor 0 phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta))))))) (taylor 0 phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta)))))))) (taylor 0 phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor 0 delta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta))))) (taylor 0 delta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta))))))) (taylor 0 delta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta)))))))) (taylor 0 delta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor 0 theta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta))))))) (taylor 0 theta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta)))))))) (taylor 0 theta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta))) (patch #s(approx ( (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta)))) (taylor 0 theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta)))))))) (taylor 0 theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta))))))))) (taylor 0 theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (sin theta))) (taylor 0 delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta)))) (taylor 0 delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta)))))))) (taylor 0 delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta))))))))) (taylor 0 delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor 0 phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta))) (taylor 0 phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta))))))) (taylor 0 phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta)))))))) (taylor 0 phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) (patch #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* delta (* theta (cos phi1))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) (patch (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1/6 (* (pow delta 2) (* theta (cos phi1)))) (* theta (cos phi1)))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) (patch (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* theta (cos phi1)) (* (pow delta 2) (+ (* -1/6 (* theta (cos phi1))) (* 1/120 (* (pow delta 2) (* theta (cos phi1)))))))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) (patch (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* theta (cos phi1)) (* (pow delta 2) (+ (* -1/6 (* theta (cos phi1))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* theta (cos phi1)))) (* 1/120 (* theta (cos phi1))))))))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) (patch (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor inf delta) (#s(alt (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) (patch (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor inf delta) (#s(alt (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) (patch (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor inf delta) (#s(alt (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) (patch (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor inf delta) (#s(alt (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) (patch (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor -inf delta) (#s(alt (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) (patch (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor -inf delta) (#s(alt (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) (patch (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor -inf delta) (#s(alt (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) (patch (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor -inf delta) (#s(alt (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) (patch (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) (patch (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) (patch (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) (patch (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) (patch (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor inf theta) (#s(alt (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) (patch (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor inf theta) (#s(alt (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) (patch (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor inf theta) (#s(alt (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) (patch (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor inf theta) (#s(alt (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) (patch (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor -inf theta) (#s(alt (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) (patch (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor -inf theta) (#s(alt (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) (patch (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor -inf theta) (#s(alt (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) (patch (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor -inf theta) (#s(alt (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) (patch (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) (patch (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi1 2) (* theta (sin delta)))) (* theta (sin delta))) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) (patch (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* theta (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* theta (sin delta))) (* 1/24 (* (pow phi1 2) (* theta (sin delta))))))) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) (patch (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* theta (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* theta (sin delta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* theta (sin delta)))) (* 1/24 (* theta (sin delta)))))))) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) (patch (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor inf phi1) (#s(alt (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) (patch (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor inf phi1) (#s(alt (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) (patch (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor inf phi1) (#s(alt (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) (patch (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor inf phi1) (#s(alt (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) (patch (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) (patch (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) (patch (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) (patch (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) (patch (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf theta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf delta) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta)))) (taylor 0 theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta)))))))) (taylor 0 theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta))))))))) (taylor 0 theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (sin theta))) (taylor 0 delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta)))) (taylor 0 delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta)))))))) (taylor 0 delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta))))))))) (taylor 0 delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor 0 phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta))) (taylor 0 phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta))))))) (taylor 0 phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta)))))))) (taylor 0 phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor 0 delta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta))))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta))))))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta)))))))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor 0 theta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta))))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta)))))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 delta) (sin.f64 theta)) (patch (.f64 (sin.f64 delta) (sin.f64 theta)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf theta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf delta) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 phi1) (#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (pow phi1 2))) (taylor 0 phi1) (#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1))) (taylor 0 phi1) (#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1))) (taylor 0 phi1) (#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor inf phi1) (#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (neg (* -2 phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 phi1) (#s(alt (cos.f64 (+.f64 phi1 phi1)) (patch (cos.f64 (+.f64 phi1 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -2 (pow phi1 2))) (taylor 0 phi1) (#s(alt (cos.f64 (+.f64 phi1 phi1)) (patch (cos.f64 (+.f64 phi1 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi1 2) (- (* 2/3 (pow phi1 2)) 2))) (taylor 0 phi1) (#s(alt (cos.f64 (+.f64 phi1 phi1)) (patch (cos.f64 (+.f64 phi1 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/3 (* -4/45 (pow phi1 2)))) 2))) (taylor 0 phi1) (#s(alt (cos.f64 (+.f64 phi1 phi1)) (patch (cos.f64 (+.f64 phi1 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 phi1)) (taylor inf phi1) (#s(alt (cos.f64 (+.f64 phi1 phi1)) (patch (cos.f64 (+.f64 phi1 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 phi1)) (taylor inf phi1) (#s(alt (cos.f64 (+.f64 phi1 phi1)) (patch (cos.f64 (+.f64 phi1 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 phi1)) (taylor inf phi1) (#s(alt (cos.f64 (+.f64 phi1 phi1)) (patch (cos.f64 (+.f64 phi1 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 phi1)) (taylor inf phi1) (#s(alt (cos.f64 (+.f64 phi1 phi1)) (patch (cos.f64 (+.f64 phi1 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (* -2 phi1))) (taylor -inf phi1) (#s(alt (cos.f64 (+.f64 phi1 phi1)) (patch (cos.f64 (+.f64 phi1 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (* -2 phi1))) (taylor -inf phi1) (#s(alt (cos.f64 (+.f64 phi1 phi1)) (patch (cos.f64 (+.f64 phi1 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (* -2 phi1))) (taylor -inf phi1) (#s(alt (cos.f64 (+.f64 phi1 phi1)) (patch (cos.f64 (+.f64 phi1 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (* -2 phi1))) (taylor -inf phi1) (#s(alt (cos.f64 (+.f64 phi1 phi1)) (patch (cos.f64 (+.f64 phi1 phi1)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi1) (taylor 0 phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (- (* 2/3 (pow phi1 2)) 1)) (taylor 0 phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (- (* (pow phi1 2) (+ 2/3 (* -2/15 (pow phi1 2)))) 1)) (taylor 0 phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (- (* (pow phi1 2) (+ 2/3 (* (pow phi1 2) (- (* 4/315 (pow phi1 2)) 2/15)))) 1)) (taylor 0 phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (sin phi1))) (taylor inf phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (sin phi1))) (taylor inf phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (sin phi1))) (taylor inf phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (sin phi1))) (taylor inf phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (sin phi1))) (taylor -inf phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (sin phi1))) (taylor -inf phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (sin phi1))) (taylor -inf phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (sin phi1))) (taylor -inf phi1) (#s(alt (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (patch (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) (patch #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 phi1) (#s(alt (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (pow phi1 2))) (taylor 0 phi1) (#s(alt (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1))) (taylor 0 phi1) (#s(alt (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1))) (taylor 0 phi1) (#s(alt (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (cos phi1) 2) (taylor inf phi1) (#s(alt (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (cos phi1) 2) (taylor inf phi1) (#s(alt (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (cos phi1) 2) (taylor inf phi1) (#s(alt (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (cos phi1) 2) (taylor inf phi1) (#s(alt (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (cos phi1) 2) (taylor -inf phi1) (#s(alt (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (cos phi1) 2) (taylor -inf phi1) (#s(alt (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (cos phi1) 2) (taylor -inf phi1) (#s(alt (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (cos phi1) 2) (taylor -inf phi1) (#s(alt (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (pow phi1 2) (cos delta)))) (taylor 0 phi1) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta)))) (taylor 0 phi1) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta)))) (taylor 0 phi1) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf phi1) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf phi1) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (taylor 0 delta) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1 (* (pow delta 2) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* 1/2 (cos (* 2 phi1))))) (taylor 0 delta) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- 1/24 (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))))) (taylor 0 delta) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- (+ 1/24 (* -1 (* (pow delta 2) (+ 1/720 (* -1/720 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))) (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))))) (taylor 0 delta) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor inf delta) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor -inf delta) (#s(alt #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) (patch #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (sin delta) (taylor 0 phi1) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (sin delta) (* -1/2 (* (pow phi1 2) (sin delta)))) (taylor 0 phi1) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* 1/24 (* (pow phi1 2) (sin delta)))))) (taylor 0 phi1) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin delta))) (* 1/24 (sin delta))))))) (taylor 0 phi1) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor inf phi1) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor inf phi1) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor inf phi1) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor inf phi1) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor -inf phi1) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor -inf phi1) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor -inf phi1) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor -inf phi1) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (cos phi1)) (taylor 0 delta) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (cos phi1) (* -1/6 (* (pow delta 2) (cos phi1))))) (taylor 0 delta) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow delta 2) (cos phi1))))))) (taylor 0 delta) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (cos phi1))) (* 1/120 (cos phi1)))))))) (taylor 0 delta) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor inf delta) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor inf delta) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor inf delta) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor inf delta) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor -inf delta) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor -inf delta) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor -inf delta) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin delta)) (taylor -inf delta) (#s(alt (.f64 (cos.f64 phi1) (sin.f64 delta)) (patch (.f64 (cos.f64 phi1) (sin.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (patch #s(approx ( (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos theta) (sin delta))) (* 1/2 (* (pow phi1 2) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (patch #s(approx ( (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/24 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* 1/2 (* (cos theta) (sin delta)))))) (taylor 0 phi1) (#s(alt #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (patch #s(approx ( (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/2 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/24 (* (cos theta) (sin delta))) (* 1/720 (* (pow phi1 2) (* (cos theta) (sin delta))))))))) (taylor 0 phi1) (#s(alt #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (patch #s(approx ( (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf phi1) (#s(alt #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (patch #s(approx ( (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf phi1) (#s(alt #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (patch #s(approx ( (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf phi1) (#s(alt #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (patch #s(approx ( (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf phi1) (#s(alt #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (patch #s(approx ( (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf phi1) (#s(alt #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (patch #s(approx ( (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf phi1) (#s(alt #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (patch #s(approx ( (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf phi1) (#s(alt #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (patch #s(approx ( (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf phi1) (#s(alt #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (patch #s(approx ( (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (patch #s(approx ( (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (sin delta))) (* 1/2 (* (pow theta 2) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (patch #s(approx ( (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/2 (* (cos phi1) (sin delta)))))) (taylor 0 theta) (#s(alt #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (patch #s(approx ( (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (sin delta))) (* 1/720 (* (pow theta 2) (* (cos phi1) (sin delta))))))))) (taylor 0 theta) (#s(alt #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (patch #s(approx ( (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf theta) (#s(alt #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (patch #s(approx ( (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf theta) (#s(alt #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (patch #s(approx ( (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf theta) (#s(alt #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (patch #s(approx ( (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf theta) (#s(alt #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (patch #s(approx ( (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf theta) (#s(alt #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (patch #s(approx ( (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf theta) (#s(alt #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (patch #s(approx ( (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf theta) (#s(alt #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (patch #s(approx ( (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf theta) (#s(alt #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (patch #s(approx ( (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* delta (* (cos phi1) (cos theta)))) (taylor 0 delta) (#s(alt #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (patch #s(approx ( (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1 (* (cos phi1) (cos theta))) (* 1/6 (* (pow delta 2) (* (cos phi1) (cos theta)))))) (taylor 0 delta) (#s(alt #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (patch #s(approx ( (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1 (* (cos phi1) (cos theta))) (* (pow delta 2) (+ (* -1/120 (* (pow delta 2) (* (cos phi1) (cos theta)))) (* 1/6 (* (cos phi1) (cos theta))))))) (taylor 0 delta) (#s(alt #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (patch #s(approx ( (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1 (* (cos phi1) (cos theta))) (* (pow delta 2) (+ (* 1/6 (* (cos phi1) (cos theta))) (* (pow delta 2) (+ (* -1/120 (* (cos phi1) (cos theta))) (* 1/5040 (* (pow delta 2) (* (cos phi1) (cos theta)))))))))) (taylor 0 delta) (#s(alt #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (patch #s(approx ( (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf delta) (#s(alt #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (patch #s(approx ( (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf delta) (#s(alt #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (patch #s(approx ( (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf delta) (#s(alt #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (patch #s(approx ( (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf delta) (#s(alt #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (patch #s(approx ( (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf delta) (#s(alt #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (patch #s(approx ( (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf delta) (#s(alt #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (patch #s(approx ( (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf delta) (#s(alt #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (patch #s(approx ( (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf delta) (#s(alt #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (patch #s(approx ( (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) #<representation binary64>) () ())) ())

Calls

219 calls:

Time	Variable		Point	Expression
1.0ms	theta	@	0	(* (sin delta) (* theta (cos phi1)))
1.0ms	phi1	@	inf	(* (neg (sin phi1)) (cos phi1))
0.0ms	phi1	@	-inf	(* (neg (sin phi1)) (cos phi1))
0.0ms	phi1	@	-inf	(+ (* 1/2 (cos (+ phi1 phi1))) 1/2)
0.0ms	theta	@	inf	(* (sin delta) (* theta (cos phi1)))

simplify469.0ms (2.9%)

Memory

-7.4MiB live, 625.2MiB allocated

Algorithm

1×	egg-herbie

Rules

14 668×	`lower-fma.f64`
14 668×	`lower-fma.f32`
7 756×	`lower-*.f64`
7 756×	`lower-*.f32`
4 740×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	440	19110
1	1456	18618
2	5028	18499
0	8223	17783

Stop Event

1×	iter limit
1×	node limit

Counts

876 → 866

Calls

Call 1

Inputs
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(* theta (* (cos phi1) (sin delta)))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* delta (* (cos phi1) (sin theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (sin delta) (sin theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* theta (sin delta))
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* delta (sin theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(* theta (* (cos phi1) (sin delta)))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* delta (* (cos phi1) (sin theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (sin delta) (sin theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* delta (sin theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* theta (sin delta))
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(* theta (* (cos phi1) (sin delta)))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* delta (* (cos phi1) (sin theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (sin delta) (sin theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* delta (* theta (cos phi1)))
(* delta (+ (* -1/6 (* (pow delta 2) (* theta (cos phi1)))) (* theta (cos phi1))))
(* delta (+ (* theta (cos phi1)) (* (pow delta 2) (+ (* -1/6 (* theta (cos phi1))) (* 1/120 (* (pow delta 2) (* theta (cos phi1))))))))
(* delta (+ (* theta (cos phi1)) (* (pow delta 2) (+ (* -1/6 (* theta (cos phi1))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* theta (cos phi1)))) (* 1/120 (* theta (cos phi1)))))))))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (sin delta))
(+ (* -1/2 (* (pow phi1 2) (* theta (sin delta)))) (* theta (sin delta)))
(+ (* theta (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* theta (sin delta))) (* 1/24 (* (pow phi1 2) (* theta (sin delta)))))))
(+ (* theta (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* theta (sin delta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* theta (sin delta)))) (* 1/24 (* theta (sin delta))))))))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(* theta (* (cos phi1) (sin delta)))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* delta (* (cos phi1) (sin theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (sin delta) (sin theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* delta (sin theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* theta (sin delta))
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
1
(+ 1 (* -1 (pow phi1 2)))
(+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))
(+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))
(+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))
(+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))
1
(+ 1 (* -2 (pow phi1 2)))
(+ 1 (* (pow phi1 2) (- (* 2/3 (pow phi1 2)) 2)))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/3 (* -4/45 (pow phi1 2)))) 2)))
(cos (* 2 phi1))
(cos (* 2 phi1))
(cos (* 2 phi1))
(cos (* 2 phi1))
(cos (neg (* -2 phi1)))
(cos (neg (* -2 phi1)))
(cos (neg (* -2 phi1)))
(cos (neg (* -2 phi1)))
(* -1 phi1)
(* phi1 (- (* 2/3 (pow phi1 2)) 1))
(* phi1 (- (* (pow phi1 2) (+ 2/3 (* -2/15 (pow phi1 2)))) 1))
(* phi1 (- (* (pow phi1 2) (+ 2/3 (* (pow phi1 2) (- (* 4/315 (pow phi1 2)) 2/15)))) 1))
(* -1 (* (cos phi1) (sin phi1)))
(* -1 (* (cos phi1) (sin phi1)))
(* -1 (* (cos phi1) (sin phi1)))
(* -1 (* (cos phi1) (sin phi1)))
(* -1 (* (cos phi1) (sin phi1)))
(* -1 (* (cos phi1) (sin phi1)))
(* -1 (* (cos phi1) (sin phi1)))
(* -1 (* (cos phi1) (sin phi1)))
(- 1 (pow (sin phi1) 2))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(cos delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- 1 (pow (sin phi1) 2))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(cos delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
1
(+ 1 (* -1 (pow phi1 2)))
(+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))
(pow (cos phi1) 2)
(pow (cos phi1) 2)
(pow (cos phi1) 2)
(pow (cos phi1) 2)
(pow (cos phi1) 2)
(pow (cos phi1) 2)
(pow (cos phi1) 2)
(pow (cos phi1) 2)
(cos delta)
(+ (cos delta) (* -1 (* (pow phi1 2) (cos delta))))
(+ (cos delta) (* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta))))
(+ (cos delta) (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (+ (* -1 (* (pow delta 2) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* 1/2 (cos (* 2 phi1)))))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- 1/24 (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- (+ 1/24 (* -1 (* (pow delta 2) (+ 1/720 (* -1/720 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))) (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(sin delta)
(+ (sin delta) (* -1/2 (* (pow phi1 2) (sin delta))))
(+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* 1/24 (* (pow phi1 2) (sin delta))))))
(+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin delta))) (* 1/24 (sin delta)))))))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* delta (cos phi1))
(* delta (+ (cos phi1) (* -1/6 (* (pow delta 2) (cos phi1)))))
(* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow delta 2) (cos phi1)))))))
(* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (cos phi1))) (* 1/120 (cos phi1))))))))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* -1 (* (cos theta) (sin delta)))
(+ (* -1 (* (cos theta) (sin delta))) (* 1/2 (* (pow phi1 2) (* (cos theta) (sin delta)))))
(+ (* -1 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/24 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* 1/2 (* (cos theta) (sin delta))))))
(+ (* -1 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/2 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/24 (* (cos theta) (sin delta))) (* 1/720 (* (pow phi1 2) (* (cos theta) (sin delta)))))))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (sin delta)))
(+ (* -1 (* (cos phi1) (sin delta))) (* 1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))))
(+ (* -1 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/2 (* (cos phi1) (sin delta))))))
(+ (* -1 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (sin delta))) (* 1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))))))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* delta (* (cos phi1) (cos theta))))
(* delta (+ (* -1 (* (cos phi1) (cos theta))) (* 1/6 (* (pow delta 2) (* (cos phi1) (cos theta))))))
(* delta (+ (* -1 (* (cos phi1) (cos theta))) (* (pow delta 2) (+ (* -1/120 (* (pow delta 2) (* (cos phi1) (cos theta)))) (* 1/6 (* (cos phi1) (cos theta)))))))
(* delta (+ (* -1 (* (cos phi1) (cos theta))) (* (pow delta 2) (+ (* 1/6 (* (cos phi1) (cos theta))) (* (pow delta 2) (+ (* -1/120 (* (cos phi1) (cos theta))) (* 1/5040 (* (pow delta 2) (* (cos phi1) (cos theta))))))))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))

Outputs
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 lambda1 (neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 lambda1 (neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 lambda1 (neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(* theta (* (cos phi1) (sin delta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(.f64 (fma.f64 (.f64 theta #s(literal -1/6 binary64)) theta #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta)))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(.f64 theta (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (fma.f64 (.f64 theta #s(literal -1/6 binary64)) theta #s(literal 1 binary64)) (.f64 (.f64 theta theta) (.f64 (.f64 theta theta) #s(literal 1/120 binary64))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(.f64 theta (fma.f64 (cos.f64 phi1) (.f64 (fma.f64 (.f64 theta #s(literal -1/6 binary64)) theta #s(literal 1 binary64)) (sin.f64 delta)) (.f64 (.f64 theta theta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (.f64 theta theta))) (fma.f64 (.f64 theta theta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* delta (* (cos phi1) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 delta (sin.f64 theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 delta (.f64 #s(literal -1/6 binary64) (.f64 delta delta)) delta))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(.f64 delta (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (+.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(.f64 delta (fma.f64 (cos.f64 phi1) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) (.f64 (.f64 (sin.f64 theta) (.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta delta) #s(literal 1/120 binary64)))) (.f64 (.f64 delta delta) (.f64 delta delta)))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (.f64 (.f64 phi1 phi1) (.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(fma.f64 (sin.f64 theta) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 delta)) (.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 (.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (.f64 (.f64 phi1 phi1) (*.f64 phi1 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* theta (sin delta))
(*.f64 (sin.f64 delta) theta)
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(.f64 (sin.f64 delta) (fma.f64 theta (.f64 #s(literal -1/6 binary64) (*.f64 theta theta)) theta))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(.f64 theta (.f64 (sin.f64 delta) (+.f64 (fma.f64 (.f64 theta #s(literal -1/6 binary64)) theta #s(literal 1 binary64)) (.f64 (.f64 theta theta) (.f64 (*.f64 theta theta) #s(literal 1/120 binary64))))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(.f64 theta (fma.f64 (fma.f64 (.f64 theta #s(literal -1/6 binary64)) theta #s(literal 1 binary64)) (sin.f64 delta) (.f64 (.f64 theta theta) (.f64 (.f64 (sin.f64 delta) (.f64 theta theta)) (fma.f64 (.f64 theta theta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(.f64 delta (.f64 (sin.f64 theta) (+.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (*.f64 delta delta))))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(.f64 delta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta) (.f64 (.f64 delta delta) (.f64 (.f64 delta (.f64 delta (sin.f64 theta))) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta delta) #s(literal 1/120 binary64))))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 lambda1 (neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 lambda1 (neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 lambda1 (neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(* theta (* (cos phi1) (sin delta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(.f64 (fma.f64 (.f64 theta #s(literal -1/6 binary64)) theta #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta)))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(.f64 theta (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (fma.f64 (.f64 theta #s(literal -1/6 binary64)) theta #s(literal 1 binary64)) (.f64 (.f64 theta theta) (.f64 (.f64 theta theta) #s(literal 1/120 binary64))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(.f64 theta (fma.f64 (cos.f64 phi1) (.f64 (fma.f64 (.f64 theta #s(literal -1/6 binary64)) theta #s(literal 1 binary64)) (sin.f64 delta)) (.f64 (.f64 theta theta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (.f64 theta theta))) (fma.f64 (.f64 theta theta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* delta (* (cos phi1) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 delta (sin.f64 theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 delta (.f64 #s(literal -1/6 binary64) (.f64 delta delta)) delta))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(.f64 delta (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (+.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(.f64 delta (fma.f64 (cos.f64 phi1) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) (.f64 (.f64 (sin.f64 theta) (.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta delta) #s(literal 1/120 binary64)))) (.f64 (.f64 delta delta) (.f64 delta delta)))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (.f64 (.f64 phi1 phi1) (.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(fma.f64 (sin.f64 theta) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 delta)) (.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 (.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (.f64 (.f64 phi1 phi1) (*.f64 phi1 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(.f64 delta (.f64 (sin.f64 theta) (+.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (*.f64 delta delta))))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(.f64 delta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta) (.f64 (.f64 delta delta) (.f64 (.f64 delta (.f64 delta (sin.f64 theta))) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta delta) #s(literal 1/120 binary64))))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* theta (sin delta))
(*.f64 (sin.f64 delta) theta)
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(.f64 (sin.f64 delta) (fma.f64 theta (.f64 #s(literal -1/6 binary64) (*.f64 theta theta)) theta))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(.f64 theta (.f64 (sin.f64 delta) (+.f64 (fma.f64 (.f64 theta #s(literal -1/6 binary64)) theta #s(literal 1 binary64)) (.f64 (.f64 theta theta) (.f64 (*.f64 theta theta) #s(literal 1/120 binary64))))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(.f64 theta (fma.f64 (fma.f64 (.f64 theta #s(literal -1/6 binary64)) theta #s(literal 1 binary64)) (sin.f64 delta) (.f64 (.f64 theta theta) (.f64 (.f64 (sin.f64 delta) (.f64 theta theta)) (fma.f64 (.f64 theta theta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 lambda1 (neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 lambda1 (neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 lambda1 (neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(* theta (* (cos phi1) (sin delta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(.f64 (fma.f64 (.f64 theta #s(literal -1/6 binary64)) theta #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta)))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(.f64 theta (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (fma.f64 (.f64 theta #s(literal -1/6 binary64)) theta #s(literal 1 binary64)) (.f64 (.f64 theta theta) (.f64 (.f64 theta theta) #s(literal 1/120 binary64))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(.f64 theta (fma.f64 (cos.f64 phi1) (.f64 (fma.f64 (.f64 theta #s(literal -1/6 binary64)) theta #s(literal 1 binary64)) (sin.f64 delta)) (.f64 (.f64 theta theta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (.f64 theta theta))) (fma.f64 (.f64 theta theta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* delta (* (cos phi1) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 delta (sin.f64 theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 delta (.f64 #s(literal -1/6 binary64) (.f64 delta delta)) delta))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(.f64 delta (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (+.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(.f64 delta (fma.f64 (cos.f64 phi1) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) (.f64 (.f64 (sin.f64 theta) (.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta delta) #s(literal 1/120 binary64)))) (.f64 (.f64 delta delta) (.f64 delta delta)))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (.f64 (.f64 phi1 phi1) (.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(fma.f64 (sin.f64 theta) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 delta)) (.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 (.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (.f64 (.f64 phi1 phi1) (*.f64 phi1 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* delta (* theta (cos phi1)))
(.f64 delta (.f64 (cos.f64 phi1) theta))
(* delta (+ (* -1/6 (* (pow delta 2) (* theta (cos phi1)))) (* theta (cos phi1))))
(.f64 (.f64 (cos.f64 phi1) theta) (fma.f64 delta (.f64 #s(literal -1/6 binary64) (.f64 delta delta)) delta))
(* delta (+ (* theta (cos phi1)) (* (pow delta 2) (+ (* -1/6 (* theta (cos phi1))) (* 1/120 (* (pow delta 2) (* theta (cos phi1))))))))
(.f64 delta (.f64 (.f64 (cos.f64 phi1) theta) (+.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta))))))
(* delta (+ (* theta (cos phi1)) (* (pow delta 2) (+ (* -1/6 (* theta (cos phi1))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* theta (cos phi1)))) (* 1/120 (* theta (cos phi1)))))))))
(.f64 delta (fma.f64 theta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (cos.f64 phi1)) (.f64 (.f64 delta delta) (.f64 (.f64 (cos.f64 phi1) (.f64 theta (.f64 delta delta))) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta delta) #s(literal 1/120 binary64))))))
(* theta (* (cos phi1) (sin delta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta))
(* theta (* (cos phi1) (sin delta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta))
(* theta (* (cos phi1) (sin delta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta))
(* theta (* (cos phi1) (sin delta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta))
(* theta (* (cos phi1) (sin delta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta))
(* theta (* (cos phi1) (sin delta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta))
(* theta (* (cos phi1) (sin delta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta))
(* theta (* (cos phi1) (sin delta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta))
(* theta (* (cos phi1) (sin delta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta))
(* theta (* (cos phi1) (sin delta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta))
(* theta (* (cos phi1) (sin delta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta))
(* theta (* (cos phi1) (sin delta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta))
(* theta (* (cos phi1) (sin delta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta))
(* theta (* (cos phi1) (sin delta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta))
(* theta (* (cos phi1) (sin delta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta))
(* theta (* (cos phi1) (sin delta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta))
(* theta (* (cos phi1) (sin delta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta))
(* theta (* (cos phi1) (sin delta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta))
(* theta (* (cos phi1) (sin delta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta))
(* theta (* (cos phi1) (sin delta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta))
(* theta (sin delta))
(*.f64 (sin.f64 delta) theta)
(+ (* -1/2 (* (pow phi1 2) (* theta (sin delta)))) (* theta (sin delta)))
(.f64 (sin.f64 delta) (fma.f64 (.f64 phi1 phi1) (*.f64 theta #s(literal -1/2 binary64)) theta))
(+ (* theta (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* theta (sin delta))) (* 1/24 (* (pow phi1 2) (* theta (sin delta)))))))
(.f64 (.f64 (sin.f64 delta) theta) (+.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (.f64 (.f64 phi1 phi1) (.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)))))
(+ (* theta (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* theta (sin delta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* theta (sin delta)))) (* 1/24 (* theta (sin delta))))))))
(fma.f64 theta (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 delta)) (.f64 (.f64 phi1 phi1) (.f64 (.f64 (sin.f64 delta) (.f64 theta (.f64 phi1 phi1))) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
(* theta (* (cos phi1) (sin delta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta))
(* theta (* (cos phi1) (sin delta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta))
(* theta (* (cos phi1) (sin delta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta))
(* theta (* (cos phi1) (sin delta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta))
(* theta (* (cos phi1) (sin delta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta))
(* theta (* (cos phi1) (sin delta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta))
(* theta (* (cos phi1) (sin delta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta))
(* theta (* (cos phi1) (sin delta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(neg.f64 (.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(neg.f64 (.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(neg.f64 (.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))) lambda1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (sin.f64 delta)))))
(* theta (* (cos phi1) (sin delta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(.f64 (fma.f64 (.f64 theta #s(literal -1/6 binary64)) theta #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) theta)))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(.f64 theta (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (fma.f64 (.f64 theta #s(literal -1/6 binary64)) theta #s(literal 1 binary64)) (.f64 (.f64 theta theta) (.f64 (.f64 theta theta) #s(literal 1/120 binary64))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(.f64 theta (fma.f64 (cos.f64 phi1) (.f64 (fma.f64 (.f64 theta #s(literal -1/6 binary64)) theta #s(literal 1 binary64)) (sin.f64 delta)) (.f64 (.f64 theta theta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (.f64 theta theta))) (fma.f64 (.f64 theta theta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* delta (* (cos phi1) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 delta (sin.f64 theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 delta (.f64 #s(literal -1/6 binary64) (.f64 delta delta)) delta))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(.f64 delta (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (+.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (.f64 delta delta))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(.f64 delta (fma.f64 (cos.f64 phi1) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) (.f64 (.f64 (sin.f64 theta) (.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta delta) #s(literal 1/120 binary64)))) (.f64 (.f64 delta delta) (.f64 delta delta)))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (.f64 (.f64 phi1 phi1) (.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(fma.f64 (sin.f64 theta) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 delta)) (.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 (.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (.f64 (.f64 phi1 phi1) (*.f64 phi1 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(.f64 delta (.f64 (sin.f64 theta) (+.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (*.f64 delta delta))))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(.f64 delta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta) (.f64 (.f64 delta delta) (.f64 (.f64 delta (.f64 delta (sin.f64 theta))) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta delta) #s(literal 1/120 binary64))))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* theta (sin delta))
(*.f64 (sin.f64 delta) theta)
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(.f64 (sin.f64 delta) (fma.f64 theta (.f64 #s(literal -1/6 binary64) (*.f64 theta theta)) theta))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(.f64 theta (.f64 (sin.f64 delta) (+.f64 (fma.f64 (.f64 theta #s(literal -1/6 binary64)) theta #s(literal 1 binary64)) (.f64 (.f64 theta theta) (.f64 (*.f64 theta theta) #s(literal 1/120 binary64))))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(.f64 theta (fma.f64 (fma.f64 (.f64 theta #s(literal -1/6 binary64)) theta #s(literal 1 binary64)) (sin.f64 delta) (.f64 (.f64 theta theta) (.f64 (.f64 (sin.f64 delta) (.f64 theta theta)) (fma.f64 (.f64 theta theta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1) lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 lambda1 (neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 lambda1 (neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(.f64 lambda1 (neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (pow phi1 2)))
(-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))
(+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))
(fma.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) #s(literal 1/3 binary64) #s(literal -1 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))
(fma.f64 (.f64 phi1 phi1) (fma.f64 phi1 (.f64 phi1 (fma.f64 (*.f64 phi1 phi1) #s(literal -2/45 binary64) #s(literal 1/3 binary64))) #s(literal -1 binary64)) #s(literal 1 binary64))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (neg (* -2 phi1)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -2 (pow phi1 2)))
(fma.f64 phi1 (*.f64 phi1 #s(literal -2 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow phi1 2) (- (* 2/3 (pow phi1 2)) 2)))
(fma.f64 (.f64 phi1 phi1) (fma.f64 phi1 (.f64 phi1 #s(literal 2/3 binary64)) #s(literal -2 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/3 (* -4/45 (pow phi1 2)))) 2)))
(fma.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -4/45 binary64) #s(literal 2/3 binary64)) #s(literal -2 binary64)) #s(literal 1 binary64))
(cos (* 2 phi1))
(cos.f64 (*.f64 phi1 #s(literal -2 binary64)))
(cos (* 2 phi1))
(cos.f64 (*.f64 phi1 #s(literal -2 binary64)))
(cos (* 2 phi1))
(cos.f64 (*.f64 phi1 #s(literal -2 binary64)))
(cos (* 2 phi1))
(cos.f64 (*.f64 phi1 #s(literal -2 binary64)))
(cos (neg (* -2 phi1)))
(cos.f64 (*.f64 phi1 #s(literal -2 binary64)))
(cos (neg (* -2 phi1)))
(cos.f64 (*.f64 phi1 #s(literal -2 binary64)))
(cos (neg (* -2 phi1)))
(cos.f64 (*.f64 phi1 #s(literal -2 binary64)))
(cos (neg (* -2 phi1)))
(cos.f64 (*.f64 phi1 #s(literal -2 binary64)))
(* -1 phi1)
(neg.f64 phi1)
(* phi1 (- (* 2/3 (pow phi1 2)) 1))
(.f64 phi1 (fma.f64 (.f64 phi1 phi1) #s(literal 2/3 binary64) #s(literal -1 binary64)))
(* phi1 (- (* (pow phi1 2) (+ 2/3 (* -2/15 (pow phi1 2)))) 1))
(.f64 phi1 (fma.f64 (.f64 phi1 phi1) (fma.f64 phi1 (*.f64 phi1 #s(literal -2/15 binary64)) #s(literal 2/3 binary64)) #s(literal -1 binary64)))
(* phi1 (- (* (pow phi1 2) (+ 2/3 (* (pow phi1 2) (- (* 4/315 (pow phi1 2)) 2/15)))) 1))
(.f64 phi1 (fma.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) #s(literal 4/315 binary64) #s(literal -2/15 binary64)) #s(literal 2/3 binary64)) #s(literal -1 binary64)))
(* -1 (* (cos phi1) (sin phi1)))
(*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))
(* -1 (* (cos phi1) (sin phi1)))
(*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))
(* -1 (* (cos phi1) (sin phi1)))
(*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))
(* -1 (* (cos phi1) (sin phi1)))
(*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))
(* -1 (* (cos phi1) (sin phi1)))
(*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))
(* -1 (* (cos phi1) (sin phi1)))
(*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))
(* -1 (* (cos phi1) (sin phi1)))
(*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))
(* -1 (* (cos phi1) (sin phi1)))
(*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))
(- 1 (pow (sin phi1) 2))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(.f64 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 delta (-.f64 (.f64 delta (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 delta (fma.f64 delta (fma.f64 (sin.f64 phi1) (-.f64 (.f64 (.f64 delta #s(literal 1/6 binary64)) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 #s(literal -1/2 binary64) (sin.f64 phi1))) #s(literal -1/2 binary64)) (neg.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 phi1 (cos.f64 theta))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 (-.f64 #s(literal 1 binary64) (.f64 phi1 phi1)) (cos.f64 delta) (.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 phi1 (-.f64 (.f64 phi1 (fma.f64 (.f64 (sin.f64 delta) (.f64 phi1 (cos.f64 theta))) #s(literal 2/3 binary64) (neg.f64 (cos.f64 delta)))) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (.f64 theta theta) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))) (cos.f64 delta))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (.f64 theta theta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 phi1))) (fma.f64 (.f64 theta theta) #s(literal -1/24 binary64) #s(literal 1/2 binary64))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (.f64 theta theta) (fma.f64 (.f64 theta theta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 phi1))) (fma.f64 (.f64 theta theta) #s(literal 1/720 binary64) #s(literal -1/24 binary64))) (.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- 1 (pow (sin phi1) 2))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(.f64 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 delta (-.f64 (.f64 delta (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 delta (fma.f64 delta (fma.f64 (sin.f64 phi1) (-.f64 (.f64 (.f64 delta #s(literal 1/6 binary64)) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 #s(literal -1/2 binary64) (sin.f64 phi1))) #s(literal -1/2 binary64)) (neg.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 theta))))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 delta) (.f64 phi1 (cos.f64 theta))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 (-.f64 #s(literal 1 binary64) (.f64 phi1 phi1)) (cos.f64 delta) (.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (neg.f64 phi1)))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 phi1 (-.f64 (.f64 phi1 (fma.f64 (.f64 (sin.f64 delta) (.f64 phi1 (cos.f64 theta))) #s(literal 2/3 binary64) (neg.f64 (cos.f64 delta)))) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (.f64 theta theta) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))) (cos.f64 delta))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (.f64 theta theta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 phi1))) (fma.f64 (.f64 theta theta) #s(literal -1/24 binary64) #s(literal 1/2 binary64))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (.f64 theta theta) (fma.f64 (.f64 theta theta) (.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 phi1))) (fma.f64 (.f64 theta theta) #s(literal 1/720 binary64) #s(literal -1/24 binary64))) (.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (pow phi1 2)))
(-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))
(+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))
(fma.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) #s(literal 1/3 binary64) #s(literal -1 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))
(fma.f64 (.f64 phi1 phi1) (fma.f64 phi1 (.f64 phi1 (fma.f64 (*.f64 phi1 phi1) #s(literal -2/45 binary64) #s(literal 1/3 binary64))) #s(literal -1 binary64)) #s(literal 1 binary64))
(pow (cos phi1) 2)
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow (cos phi1) 2)
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow (cos phi1) 2)
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow (cos phi1) 2)
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow (cos phi1) 2)
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow (cos phi1) 2)
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow (cos phi1) 2)
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow (cos phi1) 2)
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* (pow phi1 2) (cos delta))))
(.f64 (-.f64 #s(literal 1 binary64) (.f64 phi1 phi1)) (cos.f64 delta))
(+ (cos delta) (* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta))))
(fma.f64 (.f64 phi1 phi1) (.f64 (cos.f64 delta) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/3 binary64) #s(literal -1 binary64))) (cos.f64 delta))
(+ (cos delta) (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta))))
(fma.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (.f64 (cos.f64 delta) (fma.f64 (*.f64 phi1 phi1) #s(literal -2/45 binary64) #s(literal 1/3 binary64)))) (cos.f64 delta)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1 (* (pow delta 2) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* 1/2 (cos (* 2 phi1)))))
(fma.f64 (.f64 delta delta) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- 1/24 (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))))
(fma.f64 (.f64 delta delta) (fma.f64 delta (.f64 delta (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal -1/24 binary64) #s(literal 1/24 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- (+ 1/24 (* -1 (* (pow delta 2) (+ 1/720 (* -1/720 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))) (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))))
(fma.f64 (.f64 delta delta) (fma.f64 (.f64 delta delta) (fma.f64 (.f64 delta delta) (neg.f64 (fma.f64 #s(literal -1/720 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 1/720 binary64))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal -1/24 binary64) #s(literal 1/24 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))
(sin delta)
(sin.f64 delta)
(+ (sin delta) (* -1/2 (* (pow phi1 2) (sin delta))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 delta))
(+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* 1/24 (* (pow phi1 2) (sin delta))))))
(.f64 (sin.f64 delta) (+.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (.f64 (.f64 phi1 phi1) (.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64)))))
(+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin delta))) (* 1/24 (sin delta)))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 delta) (.f64 (.f64 phi1 phi1) (.f64 (.f64 phi1 (.f64 phi1 (sin.f64 delta))) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
(* (cos phi1) (sin delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(* (cos phi1) (sin delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(* (cos phi1) (sin delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(* (cos phi1) (sin delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(* (cos phi1) (sin delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(* (cos phi1) (sin delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(* (cos phi1) (sin delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(* (cos phi1) (sin delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(* delta (cos phi1))
(*.f64 (cos.f64 phi1) delta)
(* delta (+ (cos phi1) (* -1/6 (* (pow delta 2) (cos phi1)))))
(.f64 (cos.f64 phi1) (fma.f64 delta (.f64 #s(literal -1/6 binary64) (*.f64 delta delta)) delta))
(* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow delta 2) (cos phi1)))))))
(.f64 delta (.f64 (cos.f64 phi1) (+.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (.f64 delta delta) (.f64 #s(literal 1/120 binary64) (*.f64 delta delta))))))
(* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (cos phi1))) (* 1/120 (cos phi1))))))))
(.f64 delta (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (cos.f64 phi1) (.f64 (.f64 delta delta) (.f64 (.f64 delta delta) (.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta delta) #s(literal 1/120 binary64)))))))
(* (cos phi1) (sin delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(* (cos phi1) (sin delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(* (cos phi1) (sin delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(* (cos phi1) (sin delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(* (cos phi1) (sin delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(* (cos phi1) (sin delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(* (cos phi1) (sin delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(* (cos phi1) (sin delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(* -1 (* (cos theta) (sin delta)))
(*.f64 (sin.f64 delta) (neg.f64 (cos.f64 theta)))
(+ (* -1 (* (cos theta) (sin delta))) (* 1/2 (* (pow phi1 2) (* (cos theta) (sin delta)))))
(.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/2 binary64) #s(literal -1 binary64)))
(+ (* -1 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/24 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* 1/2 (* (cos theta) (sin delta))))))
(fma.f64 (.f64 phi1 phi1) (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (fma.f64 (.f64 phi1 phi1) #s(literal -1/24 binary64) #s(literal 1/2 binary64))) (*.f64 (sin.f64 delta) (neg.f64 (cos.f64 theta))))
(+ (* -1 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/2 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/24 (* (cos theta) (sin delta))) (* 1/720 (* (pow phi1 2) (* (cos theta) (sin delta)))))))))
(fma.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (fma.f64 (.f64 phi1 phi1) #s(literal 1/2 binary64) #s(literal -1 binary64)) (.f64 (.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (fma.f64 (.f64 phi1 phi1) #s(literal 1/720 binary64) #s(literal -1/24 binary64))) (.f64 (.f64 phi1 phi1) (*.f64 phi1 phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 theta))))
(* -1 (* (cos phi1) (sin delta)))
(*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 delta)))
(+ (* -1 (* (cos phi1) (sin delta))) (* 1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (fma.f64 (*.f64 theta theta) #s(literal 1/2 binary64) #s(literal -1 binary64)))
(+ (* -1 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/2 (* (cos phi1) (sin delta))))))
(fma.f64 (cos.f64 phi1) (neg.f64 (sin.f64 delta)) (.f64 (.f64 theta theta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (fma.f64 (*.f64 theta theta) #s(literal -1/24 binary64) #s(literal 1/2 binary64)))))
(+ (* -1 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (sin delta))) (* 1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))))))))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (fma.f64 (.f64 theta theta) #s(literal 1/2 binary64) #s(literal -1 binary64)) (.f64 (.f64 theta theta) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (.f64 theta theta))) (fma.f64 (*.f64 theta theta) #s(literal 1/720 binary64) #s(literal -1/24 binary64)))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 theta))))
(* -1 (* delta (* (cos phi1) (cos theta))))
(.f64 (cos.f64 theta) (neg.f64 (.f64 (cos.f64 phi1) delta)))
(* delta (+ (* -1 (* (cos phi1) (cos theta))) (* 1/6 (* (pow delta 2) (* (cos phi1) (cos theta))))))
(.f64 (.f64 (cos.f64 phi1) (.f64 delta (cos.f64 theta))) (fma.f64 (.f64 delta delta) #s(literal 1/6 binary64) #s(literal -1 binary64)))
(* delta (+ (* -1 (* (cos phi1) (cos theta))) (* (pow delta 2) (+ (* -1/120 (* (pow delta 2) (* (cos phi1) (cos theta)))) (* 1/6 (* (cos phi1) (cos theta)))))))
(.f64 delta (-.f64 (.f64 (.f64 delta delta) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (fma.f64 (.f64 delta delta) #s(literal -1/120 binary64) #s(literal 1/6 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 theta))))
(* delta (+ (* -1 (* (cos phi1) (cos theta))) (* (pow delta 2) (+ (* 1/6 (* (cos phi1) (cos theta))) (* (pow delta 2) (+ (* -1/120 (* (cos phi1) (cos theta))) (* 1/5040 (* (pow delta 2) (* (cos phi1) (cos theta))))))))))
(.f64 delta (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (fma.f64 (.f64 delta delta) #s(literal 1/6 binary64) #s(literal -1 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (fma.f64 (.f64 delta delta) #s(literal 1/5040 binary64) #s(literal -1/120 binary64))) (.f64 (.f64 delta delta) (.f64 delta delta)))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin delta))))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 theta))))

rewrite398.0ms (2.4%)

Memory

-25.5MiB live, 563.9MiB allocated

Rules

4 132×	`lower-*.f32`
4 108×	`lower-*.f64`
3 806×	`lower-fma.f32`
3 798×	`lower-fma.f64`
3 666×	`lower-/.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	86	684
0	138	681
1	466	654
2	2793	654
0	8254	644

Stop Event

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

Counts

27 → 423

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta))))
#s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))))
(.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(cos.f64 (+.f64 phi1 phi1))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
#s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
#s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
#s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta))))

Outputs
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) lambda1)
(-.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))) (/.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))))
(-.f64 (/.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) lambda1)) (/.f64 (.f64 lambda1 lambda1) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) lambda1)))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))))))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) lambda1))
(/.f64 (-.f64 (.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))) (.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) lambda1)))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) lambda1) (*.f64 lambda1 lambda1))))
(.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))))
(atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1))) #s(literal -2 binary64))
(.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(.f64 (sin.f64 delta) (.f64 (sin.f64 theta) (cos.f64 phi1)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 theta) (sin.f64 delta)))
(.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta))
(.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta))
(-.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))) #s(literal 2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta)))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta)))) #s(literal -2 binary64))
(/.f64 (-.f64 (.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (cos.f64 (+.f64 theta delta)))) #s(literal 4 binary64))
(/.f64 (-.f64 (.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (cos.f64 (+.f64 theta delta)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))))) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta)))) #s(literal -1 binary64))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 1/2 binary64))
(*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))) #s(literal 1/2 binary64))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))))
(+.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) lambda1)
(-.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))))) (/.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))))))
(-.f64 (/.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) lambda1)) (/.f64 (.f64 lambda1 lambda1) (-.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) lambda1)))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta)))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta)))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))))))))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) lambda1))
(/.f64 (-.f64 (.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))))) (.f64 (-.f64 lambda1 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta)))) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 2 binary64)))) (.f64 (-.f64 lambda1 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta)))) (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) lambda1)))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta)))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))))))
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 (sin.f64 theta) delta)))
#s(approx (* (sin delta) (sin theta)) (*.f64 (sin.f64 theta) delta))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(+.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1)
(-.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) (/.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(-.f64 (/.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1)) (/.f64 (.f64 lambda1 lambda1) (-.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1)))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1))
(/.f64 (-.f64 (.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) (.f64 (-.f64 lambda1 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (.f64 (-.f64 lambda1 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1)))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1) (*.f64 lambda1 lambda1))))
(.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1))))
(.f64 theta (.f64 (sin.f64 delta) (cos.f64 phi1)))
(.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))
(.f64 (cos.f64 phi1) (.f64 theta (sin.f64 delta)))
(.f64 (.f64 theta (cos.f64 phi1)) (sin.f64 delta))
(.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) theta)
(.f64 (.f64 theta (sin.f64 delta)) (cos.f64 phi1))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
(+.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) lambda1)
(-.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))) (/.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))))
(-.f64 (/.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #s(literal 2 binary64)) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) lambda1)) (/.f64 (.f64 lambda1 lambda1) (-.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) lambda1)))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))))))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) lambda1))
(/.f64 (-.f64 (.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))) (.f64 (-.f64 lambda1 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #s(literal 2 binary64)))) (.f64 (-.f64 lambda1 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) lambda1)))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) lambda1) (*.f64 lambda1 lambda1))))
(.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))))
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(-.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))) #s(literal 2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta)))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta)))) #s(literal -2 binary64))
(/.f64 (-.f64 (.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (cos.f64 (+.f64 theta delta)))) #s(literal 4 binary64))
(/.f64 (-.f64 (.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (cos.f64 (+.f64 theta delta)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))))) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta)))) #s(literal -1 binary64))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 1/2 binary64))
(*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))) #s(literal 1/2 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) lambda1)
(-.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))) (/.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))))
(-.f64 (/.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) lambda1)) (/.f64 (.f64 lambda1 lambda1) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) lambda1)))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))))))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) lambda1))
(/.f64 (-.f64 (.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))) (.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) lambda1)))
(pow.f64 (/.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))) (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) (-.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) lambda1) (*.f64 lambda1 lambda1))))
(.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))))
(atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (cos.f64 phi1))))
(exp.f64 (*.f64 (log.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(exp.f64 (+.f64 (log.f64 (cos.f64 phi1)) (log.f64 (cos.f64 phi1))))
(-.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64)))))
(/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (neg.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64)))) (neg.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) #s(literal -1 binary64))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))))
(.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(.f64 (pow.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))) #s(literal 1 binary64)))
(.f64 (pow.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)))
(+.f64 (.f64 (cos.f64 (/.f64 (.f64 phi1 phi1) #s(literal 0 binary64))) (cos.f64 (/.f64 (.f64 phi1 phi1) #s(literal 0 binary64)))) (.f64 (sin.f64 (/.f64 (.f64 phi1 phi1) #s(literal 0 binary64))) (sin.f64 (/.f64 (.f64 phi1 phi1) #s(literal 0 binary64)))))
(cos.f64 (+.f64 phi1 phi1))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) #s(literal 2 binary64))))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) #s(literal 2 binary64))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 1 binary64)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi1) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 phi1) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)))
(fma.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)))
(fma.f64 (cos.f64 (/.f64 (.f64 phi1 phi1) #s(literal 0 binary64))) (cos.f64 (/.f64 (.f64 phi1 phi1) #s(literal 0 binary64))) (.f64 (sin.f64 (/.f64 (.f64 phi1 phi1) #s(literal 0 binary64))) (sin.f64 (/.f64 (*.f64 phi1 phi1) #s(literal 0 binary64)))))
(fma.f64 (pow.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))) #s(literal 1 binary64)) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (pow.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))) #s(literal 1 binary64)) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)))
(fma.f64 (pow.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 1 binary64)) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (pow.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 1 binary64)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)))
(fma.f64 (pow.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (pow.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))) (.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))))))) (.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64)) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (fma.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64)) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (fma.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))))))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))) (.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))))))) (.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))))))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 #s(literal 2 binary64) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))) (*.f64 #s(literal 2 binary64) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))) (.f64 #s(literal 2 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (fma.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))) (.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))) (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))) (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))))))) (.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (fma.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))) (*.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (fma.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))))))) (*.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (-.f64 (.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))) (.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) #s(literal 1 binary64))) (.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))))
(/.f64 (-.f64 (.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))) (.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) #s(literal 1 binary64))) (.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))))
(/.f64 (-.f64 (.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1))))) (.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))) (.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (-.f64 (.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))))))) (.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))) (.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))))
(/.f64 (-.f64 (.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))) (.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (-.f64 (.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (-.f64 (.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) #s(literal 1 binary64))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))))
(/.f64 (-.f64 (.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) #s(literal 1 binary64))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))))
(/.f64 (-.f64 (.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) #s(literal 2 binary64)) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (-.f64 (.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))))
(/.f64 (-.f64 (.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (-.f64 (.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (-.f64 (.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64)) (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 1 binary64))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))))
(/.f64 (-.f64 (.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 1 binary64))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))))
(/.f64 (-.f64 (.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64)) #s(literal 2 binary64)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64)) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (-.f64 (.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64)) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64)) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))))
(/.f64 (-.f64 (.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))) (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))))
(/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))))
(/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))) #s(literal 2 binary64)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1))))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))))))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))))
(/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))) (.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal 1 binary64))) (.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))) (.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal 1 binary64))) (.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))))
(/.f64 (-.f64 #s(literal 2 binary64) (.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1))))) (.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))) (.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))))))) (.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))) (.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))) (.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) #s(literal 1 binary64))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) #s(literal 1 binary64))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))))
(/.f64 (-.f64 #s(literal 2 binary64) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1))))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))))))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))) (.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 #s(literal 2 binary64) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))) (.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 4 binary64))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))) (.f64 #s(literal 2 binary64) (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))) (.f64 #s(literal 2 binary64) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (.f64 #s(literal 2 binary64) (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))))))) (.f64 #s(literal 2 binary64) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))) (.f64 #s(literal 2 binary64) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (-.f64 (.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (-.f64 (.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))) (.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))) #s(literal 1 binary64))) (.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))) (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))))
(/.f64 (-.f64 (.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))) (.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))) #s(literal 1 binary64))) (.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))))
(/.f64 (-.f64 (.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal 2 binary64)) (.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1))))) (.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))) (.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))) (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (-.f64 (.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))) (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))))))) (.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))) (.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))))
(/.f64 (-.f64 (.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))) (.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (-.f64 (.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (-.f64 (.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))))
(/.f64 (-.f64 (.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))))
(/.f64 (-.f64 (.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) #s(literal 2 binary64)) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1))))) (*.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (-.f64 (.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))))))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))))
(/.f64 (-.f64 (.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))))) (.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (neg.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) #s(literal -1 binary64))
(*.f64 (+.f64 (cos.f64 phi1) (sin.f64 phi1)) (-.f64 (cos.f64 phi1) (sin.f64 phi1)))
(-.f64 #s(literal 0 binary64) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)))
(neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)))
(*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (neg.f64 (cos.f64 phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1))
(*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi1))
(*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)))
#s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))
#s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (cos.f64 phi1))))
(exp.f64 (*.f64 (log.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(exp.f64 (+.f64 (log.f64 (cos.f64 phi1)) (log.f64 (cos.f64 phi1))))
(-.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64)))))
(/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1)))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (neg.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64)))) (neg.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64))) #s(literal -1 binary64))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))))
(.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(.f64 (pow.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/4 binary64))))) #s(literal 1 binary64)))
(.f64 (pow.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi1))))) #s(literal -1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
#s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta))
(/.f64 (+.f64 (sin.f64 (-.f64 delta phi1)) (sin.f64 (+.f64 delta phi1))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 delta phi1)) (sin.f64 (+.f64 delta phi1)))) #s(literal -2 binary64))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
#s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))))

eval214.0ms (1.3%)

Memory: 21.4MiB live, 456.8MiB allocated
Compiler: Compiled 60 338 to 3 026 computations (95% saved)

prune278.0ms (1.7%)

Memory

5.0MiB live, 552.6MiB allocated

Pruning

59 alts after pruning (53 fresh and 6 done)

	Pruned	Kept	Total
New	1 413	22	1 435
Fresh	7	31	38
Picked	3	2	5
Done	0	4	4
Total	1 423	59	1 482

Accuracy

100.0%

Counts

1 482 → 59

Alt Table

Click to see full alt table

Status	Accuracy	Program
	57.2%	(/.f64 (-.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) lambda1))
	42.4%	(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 3 binary64)))))
	92.4%	(+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) lambda1)
	80.3%	(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1)
	68.9%	(+.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1)
	99.3%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))))))
	99.3%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
	82.0%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
✓	89.4%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
	89.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) #s(approx ( (cos phi1) (sin delta)) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
	89.3%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (cos theta)) (neg.f64 (sin.f64 phi1))) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
	92.9%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
	99.3%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta)))) (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))))
	99.4%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))))
	89.4%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 #s(approx (+ ( 1/2 (cos (+ phi1 phi1))) 1/2) #s(literal 1 binary64)) (cos.f64 delta))))))
✓	99.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))))
	94.4%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))))
	92.4%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))))))
	99.4%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))))
	39.2%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
	70.4%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))))
	77.5%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) #s(literal 1 binary64)))))
	82.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (+ (* (sin phi1) (* (neg (cos phi1)) (* (cos theta) (sin delta)))) (* (pow (cos phi1) 2) (cos delta))) (fma.f64 (.f64 (sin.f64 delta) (.f64 (sin.f64 phi1) (cos.f64 phi1))) (+.f64 #s(literal -1 binary64) (.f64 #s(literal 1/2 binary64) (.f64 theta theta))) (*.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))))
	80.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
✓	89.2%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	80.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
	77.8%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))))
	74.3%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	76.4%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
	76.5%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))))
	73.1%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 1/2 binary64))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	75.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 delta (.f64 #s(literal -1/6 binary64) (.f64 delta delta)) delta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
	78.1%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))
✓	69.3%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
	68.9%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) (fma.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) #s(literal 1/3 binary64) #s(literal -1 binary64)) #s(literal 1 binary64))))))
	62.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) (fma.f64 (.f64 phi1 phi1) (fma.f64 phi1 (.f64 phi1 (fma.f64 (*.f64 phi1 phi1) #s(literal -2/45 binary64) #s(literal 1/3 binary64))) #s(literal -1 binary64)) #s(literal 1 binary64))))))
	62.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))))
	67.6%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) #s(literal 1 binary64)))))
	77.9%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
	87.2%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))))
	87.6%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
	87.2%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))))
	87.7%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))))
	77.1%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
	87.5%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))))
	83.7%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 phi1 (sin.f64 delta)))))))
✓	87.0%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	72.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 theta (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	72.9%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 theta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1))))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
	67.0%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (* theta (cos phi1))) (.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
	67.0%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (* theta (cos phi1))) (.f64 delta (.f64 (cos.f64 phi1) theta)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
	71.3%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 delta) (fma.f64 theta (.f64 #s(literal -1/6 binary64) (.f64 theta theta)) theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	72.2%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	73.1%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	73.1%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))))))
✓	74.4%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	30.9%	#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
	99.3%	#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))) lambda1) lambda1))
	30.9%	#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))))

Compiler

Compiled 5 148 to 1 620 computations (68.5% saved)

regimes251.0ms (1.5%)

Memory

2.8MiB live, 335.8MiB allocated

Counts

105 → 1

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 theta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 delta) (fma.f64 theta (.f64 #s(literal -1/6 binary64) (.f64 theta theta)) theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) (fma.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) #s(literal 1/3 binary64) #s(literal -1 binary64)) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) (fma.f64 (.f64 phi1 phi1) (fma.f64 phi1 (.f64 phi1 (fma.f64 (*.f64 phi1 phi1) #s(literal -2/45 binary64) #s(literal 1/3 binary64))) #s(literal -1 binary64)) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (* theta (cos phi1))) (.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (* (cos phi1) (+ (* delta (* (cos theta) (neg (sin phi1)))) (cos phi1))) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (* theta (cos phi1))) (.f64 delta (.f64 (cos.f64 phi1) theta)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 1/2 binary64))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))))
(+.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 theta (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 delta (sin.f64 theta)))) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (* (cos phi1) (+ (* delta (* (cos theta) (neg (sin phi1)))) (cos phi1))) (fma.f64 (cos.f64 theta) (*.f64 phi1 (neg.f64 delta)) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 theta))))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 delta (.f64 #s(literal -1/6 binary64) (.f64 delta delta)) delta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 phi1 (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) phi1))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1)) (.f64 (cos.f64 theta) (.f64 phi1 (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 theta (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (cos theta)) (neg.f64 (sin.f64 phi1))) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) #s(approx ( (cos phi1) (sin delta)) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 theta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1))))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) lambda1))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 #s(approx (+ ( 1/2 (cos (+ phi1 phi1))) 1/2) #s(literal 1 binary64)) (cos.f64 delta))))))
(.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (cos.f64 phi1) (.f64 (cos.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) #s(approx ( (cos phi1) (* (sin delta) (cos theta))) (*.f64 (cos.f64 theta) (sin.f64 delta)))) (sin.f64 phi1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 #s(approx (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (+ (* (sin phi1) (* (neg (cos phi1)) (* (cos theta) (sin delta)))) (* (pow (cos phi1) 2) (cos delta))) (fma.f64 (.f64 (sin.f64 delta) (.f64 (sin.f64 phi1) (cos.f64 phi1))) (+.f64 #s(literal -1 binary64) (.f64 #s(literal 1/2 binary64) (.f64 theta theta))) (*.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))) lambda1) lambda1))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (sin.f64 delta) (cos.f64 theta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda1 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 3 binary64)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (neg.f64 (cos.f64 delta)))) (neg.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))))) (cos.f64 (+.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))))))) #s(literal -1/2 binary64) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (/.f64 (+.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))) #s(literal 2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (fma.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))) (+.f64 #s(literal 0 binary64) (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (neg.f64 (cos.f64 delta))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))) (.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta)))))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))))) (fma.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 delta delta))))))))))

Outputs

(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))))

Calls

7 calls:

63.0ms	lambda1
40.0ms	phi1
30.0ms	(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
29.0ms	phi2
28.0ms	theta

Results

Accuracy	Segments	Branch
99.8%	1	`lambda1`
99.8%	1	`phi1`
99.8%	1	`phi2`
99.8%	1	`delta`
99.8%	1	`theta`
99.8%	1	`(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))`
99.8%	1	`(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))`

Compiler

Compiled 104 to 70 computations (32.7% saved)

regimes219.0ms (1.3%)

Memory

-13.0MiB live, 346.1MiB allocated

Counts

84 → 1

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 theta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 delta) (fma.f64 theta (.f64 #s(literal -1/6 binary64) (.f64 theta theta)) theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) (fma.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) #s(literal 1/3 binary64) #s(literal -1 binary64)) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) (fma.f64 (.f64 phi1 phi1) (fma.f64 phi1 (.f64 phi1 (fma.f64 (*.f64 phi1 phi1) #s(literal -2/45 binary64) #s(literal 1/3 binary64))) #s(literal -1 binary64)) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (* theta (cos phi1))) (.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (* (cos phi1) (+ (* delta (* (cos theta) (neg (sin phi1)))) (cos phi1))) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (* theta (cos phi1))) (.f64 delta (.f64 (cos.f64 phi1) theta)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 1/2 binary64))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))))
(+.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 theta (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 delta (sin.f64 theta)))) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (* (cos phi1) (+ (* delta (* (cos theta) (neg (sin phi1)))) (cos phi1))) (fma.f64 (cos.f64 theta) (*.f64 phi1 (neg.f64 delta)) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 theta))))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 delta (.f64 #s(literal -1/6 binary64) (.f64 delta delta)) delta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 phi1 (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) phi1))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1)) (.f64 (cos.f64 theta) (.f64 phi1 (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 theta (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (cos theta)) (neg.f64 (sin.f64 phi1))) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) #s(approx ( (cos phi1) (sin delta)) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 theta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1))))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) lambda1))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 #s(approx (+ ( 1/2 (cos (+ phi1 phi1))) 1/2) #s(literal 1 binary64)) (cos.f64 delta))))))
(.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (cos.f64 phi1) (.f64 (cos.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) #s(approx ( (cos phi1) (* (sin delta) (cos theta))) (*.f64 (cos.f64 theta) (sin.f64 delta)))) (sin.f64 phi1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 #s(approx (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (+ (* (sin phi1) (* (neg (cos phi1)) (* (cos theta) (sin delta)))) (* (pow (cos phi1) 2) (cos delta))) (fma.f64 (.f64 (sin.f64 delta) (.f64 (sin.f64 phi1) (cos.f64 phi1))) (+.f64 #s(literal -1 binary64) (.f64 #s(literal 1/2 binary64) (.f64 theta theta))) (*.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))) (*.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (neg (sin phi1)) (cos theta)) (* (cos phi1) (sin delta))) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))) (fma.f64 lambda1 (/.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (-.f64 (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))) lambda1) lambda1))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))))) (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))

Outputs

(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))))

Calls

7 calls:

58.0ms	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
30.0ms	phi2
28.0ms	lambda1
27.0ms	delta
25.0ms	phi1

Results

Accuracy	Segments	Branch
99.4%	1	`lambda1`
99.4%	1	`phi1`
99.4%	1	`phi2`
99.4%	1	`delta`
99.4%	1	`theta`
99.4%	1	`(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))`
99.4%	1	`(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))`

Compiler

Compiled 104 to 70 computations (32.7% saved)

regimes156.0ms (1%)

Memory

9.0MiB live, 205.0MiB allocated

Counts

65 → 1

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 theta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 delta) (fma.f64 theta (.f64 #s(literal -1/6 binary64) (.f64 theta theta)) theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) (fma.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) #s(literal 1/3 binary64) #s(literal -1 binary64)) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) (fma.f64 (.f64 phi1 phi1) (fma.f64 phi1 (.f64 phi1 (fma.f64 (*.f64 phi1 phi1) #s(literal -2/45 binary64) #s(literal 1/3 binary64))) #s(literal -1 binary64)) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (* theta (cos phi1))) (.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (* (cos phi1) (+ (* delta (* (cos theta) (neg (sin phi1)))) (cos phi1))) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (* theta (cos phi1))) (.f64 delta (.f64 (cos.f64 phi1) theta)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 1/2 binary64))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))))
(+.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 theta (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 delta (sin.f64 theta)))) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (* (cos phi1) (+ (* delta (* (cos theta) (neg (sin phi1)))) (cos phi1))) (fma.f64 (cos.f64 theta) (*.f64 phi1 (neg.f64 delta)) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 theta))))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 delta (.f64 #s(literal -1/6 binary64) (.f64 delta delta)) delta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 phi1 (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) phi1))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1)) (.f64 (cos.f64 theta) (.f64 phi1 (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 theta (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (* (neg (sin phi1)) (cos theta)) (neg.f64 (sin.f64 phi1))) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) #s(approx ( (cos phi1) (sin delta)) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 delta (.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 theta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1))))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) lambda1))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 #s(approx (+ ( 1/2 (cos (+ phi1 phi1))) 1/2) #s(literal 1 binary64)) (cos.f64 delta))))))
(.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta)))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) #s(approx (* (neg (cos phi1)) (* (cos theta) (sin delta))) (neg.f64 (.f64 (sin.f64 delta) (cos.f64 theta)))) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (+ (neg ( (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)) (.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal -2 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 delta))))))

Outputs

(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))

Calls

7 calls:

42.0ms	phi1
20.0ms	delta
19.0ms	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
19.0ms	theta
18.0ms	(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))

Results

Accuracy	Segments	Branch
92.9%	1	`lambda1`
92.9%	1	`phi1`
92.9%	1	`phi2`
92.9%	1	`delta`
92.9%	1	`theta`
92.9%	1	`(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))`
92.9%	1	`(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))`

Compiler

Compiled 104 to 70 computations (32.7% saved)

regimes86.0ms (0.5%)

Memory

10.7MiB live, 127.5MiB allocated

Counts

37 → 1

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 theta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 delta) (fma.f64 theta (.f64 #s(literal -1/6 binary64) (.f64 theta theta)) theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) (fma.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) #s(literal 1/3 binary64) #s(literal -1 binary64)) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) (fma.f64 (.f64 phi1 phi1) (fma.f64 phi1 (.f64 phi1 (fma.f64 (*.f64 phi1 phi1) #s(literal -2/45 binary64) #s(literal 1/3 binary64))) #s(literal -1 binary64)) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (* theta (cos phi1))) (.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (* (cos phi1) (+ (* delta (* (cos theta) (neg (sin phi1)))) (cos phi1))) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (* theta (cos phi1))) (.f64 delta (.f64 (cos.f64 phi1) theta)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 1/2 binary64))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))))
(+.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 theta (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 delta (sin.f64 theta)))) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (* (cos phi1) (+ (* delta (* (cos theta) (neg (sin phi1)))) (cos phi1))) (fma.f64 (cos.f64 theta) (*.f64 phi1 (neg.f64 delta)) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 theta))))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 delta (.f64 #s(literal -1/6 binary64) (.f64 delta delta)) delta))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 phi1 (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi1 #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))

Outputs

(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))

Calls

7 calls:

18.0ms	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
13.0ms	phi2
12.0ms	theta
10.0ms	phi1
10.0ms	delta

Results

Accuracy	Segments	Branch
89.2%	1	`lambda1`
89.2%	1	`phi2`
89.2%	1	`delta`
89.2%	1	`theta`
89.2%	1	`phi1`
89.2%	1	`(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))`
89.2%	1	`(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))`

Compiler

Compiled 104 to 70 computations (32.7% saved)

regimes62.0ms (0.4%)

Memory

9.1MiB live, 116.2MiB allocated

Counts

24 → 1

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 theta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 delta) (fma.f64 theta (.f64 #s(literal -1/6 binary64) (.f64 theta theta)) theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) (fma.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) #s(literal 1/3 binary64) #s(literal -1 binary64)) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) (fma.f64 (.f64 phi1 phi1) (fma.f64 phi1 (.f64 phi1 (fma.f64 (*.f64 phi1 phi1) #s(literal -2/45 binary64) #s(literal 1/3 binary64))) #s(literal -1 binary64)) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (* theta (cos phi1))) (.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (* (cos phi1) (+ (* delta (* (cos theta) (neg (sin phi1)))) (cos phi1))) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (* theta (cos phi1))) (.f64 delta (.f64 (cos.f64 phi1) theta)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 1/2 binary64))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))))
(+.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 theta (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (.f64 delta (sin.f64 theta)))) (cos.f64 phi1)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))

Outputs

(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))

Calls

7 calls:

11.0ms	lambda1
11.0ms	phi2
10.0ms	(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
7.0ms	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
7.0ms	phi1

Results

Accuracy	Segments	Branch
87.0%	1	`delta`
87.0%	1	`phi2`
87.0%	1	`phi1`
87.0%	1	`theta`
87.0%	1	`lambda1`
87.0%	1	`(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))`
87.0%	1	`(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))`

Compiler

Compiled 104 to 70 computations (32.7% saved)

regimes32.0ms (0.2%)

Memory

-6.9MiB live, 81.1MiB allocated

Counts

10 → 3

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 theta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 delta) (fma.f64 theta (.f64 #s(literal -1/6 binary64) (.f64 theta theta)) theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) (fma.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) #s(literal 1/3 binary64) #s(literal -1 binary64)) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) (fma.f64 (.f64 phi1 phi1) (fma.f64 phi1 (.f64 phi1 (fma.f64 (*.f64 phi1 phi1) #s(literal -2/45 binary64) #s(literal 1/3 binary64))) #s(literal -1 binary64)) #s(literal 1 binary64))))))

Outputs

(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))

(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))

(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 theta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))

Calls

7 calls:

7.0ms	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
5.0ms	lambda1
4.0ms	(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
4.0ms	theta
4.0ms	delta

Results

Accuracy	Segments	Branch
74.4%	1	`phi1`
81.9%	3	`theta`
76.4%	2	`lambda1`
76.0%	2	`phi2`
82.3%	3	`delta`
76.1%	2	`(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))`
78.0%	3	`(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))`

Compiler

Compiled 104 to 70 computations (32.7% saved)

regimes9.0ms (0.1%)

Memory

-19.5MiB live, 18.2MiB allocated

Counts

6 → 3

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))

Outputs

(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))

(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))

(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))

Calls

2 calls:

5.0ms	theta
3.0ms	delta

Results

Accuracy	Segments	Branch
81.9%	3	`theta`
81.5%	3	`delta`

Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes5.0ms (0%)

Memory

13.4MiB live, 13.4MiB allocated

Counts

5 → 3

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (.f64 theta (cos.f64 phi1)))) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) #s(approx (pow (cos phi1) 2) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))))

Outputs

(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))

(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))

(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))

Calls

2 calls:

2.0ms	theta
2.0ms	delta

Results

Accuracy	Segments	Branch
81.5%	3	`delta`
81.2%	3	`theta`

Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes9.0ms (0.1%)

Memory

21.5MiB live, 21.5MiB allocated

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts

1 → 1

Calls

Call 1

Inputs

(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))

Outputs

(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (*.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))

Calls

6 calls:

2.0ms	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
2.0ms	(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
1.0ms	delta
1.0ms	theta
1.0ms	phi2

Results

Accuracy	Segments	Branch
74.4%	1	`phi2`
74.4%	1	`(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))`
74.4%	1	`(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))`
74.4%	1	`lambda1`
74.4%	1	`theta`
74.4%	1	`delta`

Compiler

Compiled 98 to 65 computations (33.7% saved)

bsearch55.0ms (0.3%)

Memory

-43.8MiB live, 54.8MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
34.0ms	2.3160466409255832e+36	6.07870326596547e+36
18.0ms	-489.30308441553024	-391.669098355768

Samples

37.0ms

128×

valid

Compiler

Compiled 385 to 247 computations (35.8% saved)

Precisions

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

ival-sin: 12.0ms (37.6% of total)

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

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

ival-asin: 2.0ms (6.3% of total)

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

ival-atan2: 1.0ms (3.1% of total)

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

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

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

bsearch55.0ms (0.3%)

Memory

18.2MiB live, 92.9MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	predicate-same
1×	narrow-enough

Steps

Time	Left	Right
8.0ms	1.0571780020548375e-17	3.113145668355436e-17
43.0ms	-84877727831168780.0	-4357124417877.454

Samples

45.0ms

160×

valid

Compiler

Compiled 415 to 261 computations (37.1% saved)

Precisions

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

ival-sin: 17.0ms (43.8% of total)

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

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

ival-asin: 3.0ms (7.7% of total)

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

ival-atan2: 1.0ms (2.6% of total)

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

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

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

bsearch134.0ms (0.8%)

Memory

11.5MiB live, 129.5MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
54.0ms	1.7818766125017193e+46	2.530602013540347e+50
75.0ms	-769273.7476926923	-489.30308441553024

Samples

84.0ms

256×

valid

Compiler

Compiled 617 to 383 computations (37.9% saved)

Precisions

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

ival-cos: 34.0ms (45.3% of total)

ival-sin: 22.0ms (29.3% of total)

ival-mult: 9.0ms (12% of total)

ival-asin: 5.0ms (6.7% of total)

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

ival-atan2: 2.0ms (2.7% of total)

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

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

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

simplify17.0ms (0.1%)

Memory

-6.5MiB live, 31.8MiB allocated

Algorithm

1×	egg-herbie

Rules

46×	`*-commutative_binary64`
38×	`+-commutative_binary64`
22×	`sub-neg_binary64`
20×	`neg-sub0_binary64`
20×	`neg-mul-1_binary64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	116	737
1	154	737
2	174	737
3	198	737
4	211	737
5	216	737
6	218	737

Stop Event

1×

saturated

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(if (<=.f64 delta #s(literal -410 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 theta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (if (<=.f64 delta #s(literal 2349999999999999944735847609781977088 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 theta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(if (<=.f64 theta #s(literal -8500000000000000 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (if (<=.f64 theta #s(literal 6490371073168535/324518553658426726783156020576256 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(if (<=.f64 delta #s(literal -3550 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (if (<=.f64 delta #s(literal 5199999999999999903479830175969499460941027213312 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))

Outputs
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (neg.f64 (cos.f64 theta)))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (neg.f64 (/.f64 (+.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (sin delta) (cos theta)))) (sin phi1))) (fma.f64 (/.f64 (sin.f64 (+.f64 phi1 phi1)) (neg.f64 #s(literal 2 binary64))) (.f64 (sin.f64 delta) (cos.f64 theta)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(if (<=.f64 delta #s(literal -410 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 theta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (if (<=.f64 delta #s(literal 2349999999999999944735847609781977088 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 theta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(if (<=.f64 delta #s(literal -410 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 theta (.f64 (sin.f64 delta) (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (if (<=.f64 delta #s(literal 2349999999999999944735847609781977088 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 theta (.f64 (sin.f64 delta) (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(if (<=.f64 theta #s(literal -8500000000000000 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (if (<=.f64 theta #s(literal 6490371073168535/324518553658426726783156020576256 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(if (<=.f64 theta #s(literal -8500000000000000 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (if (<=.f64 theta #s(literal 6490371073168535/324518553658426726783156020576256 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (.f64 (sin.f64 theta) (fma.f64 #s(literal -1/6 binary64) (.f64 delta delta) #s(literal 1 binary64)))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(if (<=.f64 delta #s(literal -3550 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (if (<=.f64 delta #s(literal 5199999999999999903479830175969499460941027213312 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(if (<=.f64 delta #s(literal -3550 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (if (<=.f64 delta #s(literal 5199999999999999903479830175969499460941027213312 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 delta (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin delta) (sin theta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))

soundness1.1s (6.9%)

Memory

33.1MiB live, 969.7MiB allocated

Rules

18 094×	`lower-fma.f64`
18 094×	`lower-fma.f32`
16 426×	`lower-fma.f64`
16 426×	`lower-fma.f32`
14 040×	`lower-fma.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	88	612
0	139	608
1	487	549
2	3336	549
0	8955	541
0	22	147
0	40	139
1	120	139
2	846	139
0	8744	133
0	281	5807
1	976	5684
2	3423	5625
3	5995	5582
0	8162	5302
0	86	684
0	138	681
1	466	654
2	2793	654
0	8254	644
0	578	20561
1	1927	18305
2	6501	17724
0	8303	17385
0	490	19108
1	1633	18643
2	5590	18571
0	8155	17721

Stop Event

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

Compiler

Compiled 845 to 444 computations (47.5% saved)

preprocess109.0ms (0.7%)

Memory: -35.5MiB live, 169.8MiB allocated
Remove: (abs phi2)
Compiler: Compiled 998 to 426 computations (57.3% saved)

end0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated

start0.0ms (0%)

analyze1.2s (7.5%)

sample3.0s (18%)

explain575.0ms (3.5%)

preprocess256.0ms (1.6%)

eval0.0ms (0%)

prune1.0ms (0%)

simplify54.0ms (0.3%)

localize139.0ms (0.8%)

series46.0ms (0.3%)

simplify302.0ms (1.8%)

rewrite371.0ms (2.3%)

eval100.0ms (0.6%)

prune313.0ms (1.9%)

simplify389.0ms (2.4%)

localize496.0ms (3%)

series97.0ms (0.6%)

simplify481.0ms (2.9%)

rewrite392.0ms (2.4%)

eval319.0ms (1.9%)

prune774.0ms (4.7%)

simplify324.0ms (2%)

localize486.0ms (3%)

series84.0ms (0.5%)

simplify339.0ms (2.1%)

rewrite534.0ms (3.3%)

eval382.0ms (2.3%)

prune457.0ms (2.8%)

simplify345.0ms (2.1%)

localize355.0ms (2.2%)

series99.0ms (0.6%)

simplify469.0ms (2.9%)

rewrite398.0ms (2.4%)

eval214.0ms (1.3%)

prune278.0ms (1.7%)

regimes251.0ms (1.5%)

regimes219.0ms (1.3%)

regimes156.0ms (1%)

regimes86.0ms (0.5%)

regimes62.0ms (0.4%)

regimes32.0ms (0.2%)

regimes9.0ms (0.1%)

regimes5.0ms (0%)

regimes9.0ms (0.1%)

bsearch55.0ms (0.3%)

bsearch55.0ms (0.3%)

bsearch134.0ms (0.8%)

simplify17.0ms (0.1%)

soundness1.1s (6.9%)

preprocess109.0ms (0.7%)

end0.0ms (0%)

Profiling