Metrics for Destination given bearing on a great circle

start0.0ms (0%)

Memory: 0.1MiB live, 0.1MiB allocated

analyze1.2s (7.8%)

Memory

16.2MiB live, 1 281.8MiB 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.1s (20.3%)

Memory

-3.8MiB live, 2 269.4MiB allocated

Samples

2.6s

8 256×

valid

Precisions

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

ival-sin: 825.0ms (37% of total)

ival-cos: 697.0ms (31.2% of total)

ival-mult: 319.0ms (14.3% of total)

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

ival-atan2: 83.0ms (3.7% of total)

ival-add: 75.0ms (3.4% of total)

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

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

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

Bogosity

explain442.0ms (2.9%)

Memory

-15.9MiB live, 446.6MiB allocated

FPErrors

Click to see full error table

Ground Truth	Overpredictions	Example	Underpredictions	Example	Subexpression
9	1	(1.5375885773878214e+72 3.761265772825624e+66 1.6785290721493145e+269 -2.3527872057979517e-45 -2.499760382403889e-91)	3	(4.853152627321171e+169 -2.9310158979490374e+109 -1.471963439912034e-307 -0.5808387139306496 2.402933043392522e+181)	`(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))`
3	0	-	1	(-4.693269686728924e+28 -1.7355975785127982e+118 5.4172956494289157e+79 -2.8417046249893122e-285 -1.091242370326863e+110)	`(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
`asin.f64`	`(asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))`	sensitivity	2	1
`-.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	1	0

Confusion

	Predicted +	Predicted -
+	0	0
-	3	253

Precision

0.0

Recall

0/0

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	0	0	0
-	3	1	252

Precision?

0.0

Recall?

0/0

Freqs

test

number	freq
0	253
1	3

Total Confusion?

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

Precision?

0.0

Recall?

0/0

Samples

157.0ms

512×

valid

Compiler

Compiled 431 to 73 computations (83.1% saved)

Precisions

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

ival-sin: 39.0ms (34.7% of total)

ival-cos: 30.0ms (26.7% of total)

ival-mult: 18.0ms (16% of total)

ival-asin: 9.0ms (8% of total)

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

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

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

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

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

preprocess245.0ms (1.6%)

Memory

-1.7MiB live, 74.8MiB allocated

Algorithm

1×	egg-herbie

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 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (cos.f64 delta))) lambda1)

Symmetry

(abs phi2)

Compiler

Compiled 33 to 23 computations (30.3% saved)

eval0.0ms (0%)

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

prune1.0ms (0%)

Memory

1.2MiB live, 1.2MiB allocated

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	99.8%	(+.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.8%

(+.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 33 to 23 computations (30.3% saved)

simplify50.0ms (0.3%)

Memory

-23.0MiB live, 17.2MiB 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)))

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 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (asin.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (cos.f64 delta))) lambda1)
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 (cos.f64 phi1) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (asin.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (cos.f64 delta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 theta) (sin.f64 delta)))
(*.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)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (asin.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (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 (asin.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (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 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(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 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(cos.f64 theta)

localize101.0ms (0.7%)

Memory

21.4MiB live, 97.5MiB allocated

Localize:

Found 4 expressions of interest:

New	Metric	Score
accuracy	0.234375	(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy	0.2890625	(.f64 (sin.f64 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.3500190583802452	(asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
accuracy	0.4747611668419882	(-.f64 (cos.f64 delta) (.f64 (sin.f64 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

86.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: 36.0ms (50.2% of total)

ival-cos: 15.0ms (20.9% of total)

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

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

ival-atan2: 3.0ms (4.2% of total)

ival-add: 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)

series51.0ms (0.3%)

Memory

-26.1MiB live, 53.1MiB 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 (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 (+ (* (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 (+ 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 (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 (* 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 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 (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 (* (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 (* 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 (+ (* (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 (+ 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 (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 (* (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 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 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 (* (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 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 (+ (* (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 (+ 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 (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 (* (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 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 -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 (* (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 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 (* (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 (+ 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 (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 (* (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 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 (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 (* 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 (+ (* (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 (+ 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 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 (* (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 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 (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 (* (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 (+ (* (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 (+ 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 -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 (* (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 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 (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 (* (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) (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 (+ 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 (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 (* 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 (- 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 (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 (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 (* 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 (+ (* (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 (+ 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 (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 (* (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 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 (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 (* (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 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 (+ (* (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 (+ 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 (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 (* (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 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 (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 (* (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 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

12 calls:

Time	Variable		Point	Expression
8.0ms	theta	@	inf	((+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (+ 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 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (* (sin theta) (sin delta)))
5.0ms	delta	@	inf	((+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (+ 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 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (* (sin theta) (sin delta)))
3.0ms	theta	@	-inf	((+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (+ 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 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (* (sin theta) (sin delta)))
3.0ms	phi1	@	inf	((+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (+ 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 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (* (sin theta) (sin delta)))
3.0ms	delta	@	-inf	((+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (+ 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 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (* (sin theta) (sin delta)))

simplify265.0ms (1.7%)

Memory

10.8MiB live, 203.7MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	281	5807
1	976	5684
2	3436	5625
3	6008	5582
0	8060	5302

Stop Event

1×	iter limit
1×	node limit

Counts

288 → 286

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)))
(+ (* (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)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* 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 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)))))
(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)))))
(* (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)))))))))
(* 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))))))))
(+ (* (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))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (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 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)))))
(* (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 delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin 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))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (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 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)))))
(* (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 delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (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)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (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 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)))))
(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))))
(+ (* (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))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (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 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)))))
(* (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)))))
(+ (* (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))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (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 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)))))
(* (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)
(+ (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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* 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)))))))))
(- 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))
(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)))))
(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))
(* 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))))))))
(+ (* (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))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (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 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)))))
(* (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 delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin 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))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (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 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)))))
(* (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 delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))

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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
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 #s(literal 1 binary64) (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) 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 #s(literal 1 binary64) (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) 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 #s(literal 1 binary64) (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) 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)))
(fma.f64 #s(literal 1 binary64) (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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)))
(fma.f64 #s(literal 1 binary64) (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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)))
(fma.f64 #s(literal 1 binary64) (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) theta) theta #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 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))))))))
(fma.f64 (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (.f64 theta theta) #s(literal -1/2 binary64))) (.f64 theta theta) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.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 (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 (.f64 theta theta) (fma.f64 #s(literal -1/720 binary64) (.f64 theta theta) #s(literal 1/24 binary64)) #s(literal -1/2 binary64))) (.f64 theta theta) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* theta (* (cos phi1) (sin delta)))
(.f64 (.f64 theta (cos.f64 phi1)) (sin.f64 delta))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (.f64 theta (cos.f64 phi1)) (sin.f64 delta)))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(fma.f64 (pow.f64 theta #s(literal 3 binary64)) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal 1/120 binary64) (.f64 theta theta) #s(literal -1/6 binary64))) (.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 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)))))))))
(fma.f64 (pow.f64 theta #s(literal 3 binary64)) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 (.f64 theta theta) (fma.f64 #s(literal -1/5040 binary64) (.f64 theta theta) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) (.f64 (.f64 theta (cos.f64 phi1)) (sin.f64 delta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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 (neg.f64 (.f64 (sin.f64 phi1) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) theta) theta #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.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 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal -1/24 binary64) (.f64 theta theta) #s(literal 1/2 binary64))) (.f64 theta theta) (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 (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/720 binary64) (.f64 theta theta) #s(literal -1/24 binary64))) (.f64 theta theta)) (.f64 theta theta) (+.f64 (neg.f64 (.f64 (sin.f64 phi1) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) theta) theta #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (cos.f64 delta)))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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 (fma.f64 (.f64 #s(literal -1/2 binary64) theta) theta #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 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))))))))
(fma.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (.f64 theta theta) #s(literal -1/2 binary64))) (.f64 theta theta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.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)))))))))
(fma.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 theta theta) (fma.f64 #s(literal -1/720 binary64) (.f64 theta theta) #s(literal 1/24 binary64)) #s(literal -1/2 binary64))) (.f64 theta theta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (*.f64 theta (sin.f64 delta)))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(fma.f64 (pow.f64 theta #s(literal 3 binary64)) (.f64 (sin.f64 delta) (fma.f64 #s(literal 1/120 binary64) (.f64 theta theta) #s(literal -1/6 binary64))) (*.f64 theta (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))))))))
(fma.f64 (pow.f64 theta #s(literal 3 binary64)) (.f64 (sin.f64 delta) (fma.f64 (.f64 theta theta) (fma.f64 #s(literal -1/5040 binary64) (.f64 theta theta) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) (.f64 theta (sin.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (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 (cos.f64 delta) phi1))
(+ (* phi1 (+ (cos delta) (* -1/2 (* phi1 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta)))
(fma.f64 (fma.f64 phi1 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) phi1))
(+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* phi1 (cos delta))))))) (* (cos theta) (sin delta)))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 delta)) phi1 (.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 delta)) (cos.f64 theta))) phi1 (cos.f64 delta)) phi1 (.f64 (cos.f64 theta) (sin.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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(+ (* (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 theta) (sin.f64 delta)) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (.f64 phi1 phi1) (.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64)) #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 (.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 (.f64 phi1 phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(literal -1/2 binary64))) (.f64 phi1 phi1) (.f64 (sin.f64 theta) (sin.f64 delta)))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) 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 (neg.f64 (fma.f64 (fma.f64 (.f64 (sin.f64 delta) phi1) (.f64 (cos.f64 theta) #s(literal -2/3 binary64)) (cos.f64 delta)) phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))) phi1 (cos.f64 delta))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(* phi1 (* (cos theta) (sin delta)))
(.f64 (.f64 phi1 (sin.f64 delta)) (cos.f64 theta))
(* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))
(.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))
(.f64 (fma.f64 (fma.f64 (.f64 (sin.f64 delta) phi1) (.f64 (cos.f64 theta) #s(literal -2/3 binary64)) (cos.f64 delta)) phi1 (.f64 (cos.f64 theta) (sin.f64 delta))) phi1)
(* 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 (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/3 binary64) (cos.f64 delta)) phi1 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) #s(literal -2/3 binary64)))) phi1 (cos.f64 delta)) phi1 (*.f64 (cos.f64 theta) (sin.f64 delta))) phi1)
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(sin phi1)
(sin.f64 phi1)
(+ (sin phi1) (* delta (* (cos phi1) (cos theta))))
(fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))
(+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (cos.f64 phi1))) delta (sin.f64 phi1))
(+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (* delta (* (cos phi1) (cos theta)))))) (* (cos phi1) (cos theta)))))
(fma.f64 (fma.f64 (fma.f64 delta (.f64 #s(literal -1/6 binary64) delta) #s(literal 1 binary64)) (.f64 (cos.f64 theta) (cos.f64 phi1)) (.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta)) 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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* delta (* (cos phi1) (sin theta)))
(.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (.f64 (.f64 delta (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))))))))
(fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (*.f64 delta (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)))))))))
(fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 (.f64 delta delta) (fma.f64 (.f64 delta delta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta)))
(- 1 (pow (sin phi1) 2))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(.f64 (cos.f64 phi1) (fma.f64 (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)) delta (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 (.f64 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) delta) delta (.f64 (cos.f64 phi1) (fma.f64 (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)) delta (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 (.f64 (fma.f64 (sin.f64 phi1) (fma.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)) delta) delta (.f64 (cos.f64 phi1) (fma.f64 (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)) delta (cos.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(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 (.f64 delta (cos.f64 theta)) (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 (.f64 (sin.f64 phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) delta) (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1)))) delta (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 (fma.f64 (fma.f64 delta (.f64 #s(literal -1/6 binary64) delta) #s(literal 1 binary64)) (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) delta) #s(literal -1/2 binary64))) delta (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(* delta (sin theta))
(*.f64 (sin.f64 theta) delta)
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (*.f64 (sin.f64 theta) delta))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) 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))))))))
(fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) (fma.f64 (.f64 delta delta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))

rewrite211.0ms (1.4%)

Memory

18.7MiB live, 173.5MiB allocated

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
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>

eval141.0ms (0.9%)

Memory: -13.4MiB live, 181.3MiB allocated
Compiler: Compiled 30 603 to 2 354 computations (92.3% saved)

prune51.0ms (0.3%)

Memory

24.1MiB live, 106.4MiB allocated

Pruning

25 alts after pruning (25 fresh and 0 done)

	Pruned	Kept	Total
New	601	25	626
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	602	25	627

Accuracy

100.0%

Counts

627 → 25

Alt Table

Click to see full alt table

Status	Accuracy	Program
	99.6%	(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)))
▶	99.8%	(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (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))))
	90.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)))) (pow.f64 (fma.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))) #s(literal -1 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)) (.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (sin.f64 phi1) (cos.f64 delta)))))
	99.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64))))))
	99.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))) (.f64 (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)))) (.f64 (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))))
▶	99.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
	99.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))
▶	99.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (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 (sin.f64 phi1) (sin.f64 (-.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (.f64 (PI.f64) #s(literal 1/2 binary64))) (.f64 #s(literal 2 binary64) (PI.f64)))) (.f64 (PI.f64) #s(literal 1/2 binary64))))))))
	99.8%	(+.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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))) #s(literal 2 binary64))))))))
	88.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 #s(approx (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
	91.7%	(+.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.2%	(+.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 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
	77.2%	(+.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 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
	82.6%	(+.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 (.f64 phi1 (sin.f64 delta)) (cos.f64 theta))))))
▶	82.6%	(+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
	81.7%	(+.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))))))) (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) delta) delta (.f64 (cos.f64 phi1) (fma.f64 (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)) delta (cos.f64 phi1)))))))
	77.7%	(+.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 (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)) delta (cos.f64 phi1))))))
	76.9%	(+.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) (cos.f64 phi1)))))
▶	88.4%	(+.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))))
	99.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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.7%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
	35.9%	#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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))

Compiler

Compiled 1 832 to 1 122 computations (38.8% saved)

simplify221.0ms (1.4%)

Memory

9.9MiB live, 84.9MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	0	(atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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)))
cost-diff	1472	(/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (*.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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))
cost-diff	0	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
cost-diff	1408	(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (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)) (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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))))))) (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (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) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
cost-diff	6464	(fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	65	899
0	110	881
1	177	859
2	299	859
3	601	859
4	1244	859
5	1907	859
6	3083	859
7	4572	859
8	5101	859
9	5451	859
10	5506	859
11	5517	859
12	5838	859
13	6142	859
14	6512	859
15	6819	859
16	7316	859
17	7856	859
18	7998	859
0	8042	859

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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (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) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))
(cos.f64 delta)
(fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(sin.f64 phi1)
#s(literal 2 binary64)
(.f64 (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(cos.f64 theta)
(*.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) (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)) (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))
(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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))
(.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))
(sin.f64 phi1)
(fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))
(*.f64 delta (cos.f64 theta))
(cos.f64 theta)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))
#s(literal 1 binary64)
(/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))
(cos.f64 delta)
(.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))
(fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(cos.f64 theta)
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(sin.f64 phi1)
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta))))
(cos.f64 phi1)
phi1
(/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta)))
#s(literal 1 binary64)
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(-.f64 (cos.f64 delta) (.f64 (sin.f64 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) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (cos.f64 delta))) lambda1)
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (cos.f64 delta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (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) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (cos.f64 delta))
(cos.f64 delta)
(fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))
(.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (sin.f64 phi1))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(sin.f64 phi1)
#s(literal 2 binary64)
(.f64 (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))
(.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(cos.f64 theta)
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (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))))))) (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)
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 (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 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (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
#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)) (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (fma.f64 (.f64 (cos.f64 phi1) delta) (cos.f64 theta) (sin.f64 phi1)) (sin.f64 phi1))))) lambda1)
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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (fma.f64 (.f64 (cos.f64 phi1) delta) (cos.f64 theta) (sin.f64 phi1)) (sin.f64 phi1)))))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))
(-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (fma.f64 (.f64 (cos.f64 phi1) delta) (cos.f64 theta) (sin.f64 phi1)) (sin.f64 phi1))))
(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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (fma.f64 (.f64 (cos.f64 phi1) delta) (cos.f64 theta) (sin.f64 phi1)) (sin.f64 phi1)))
(.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))
(.f64 (fma.f64 (.f64 (cos.f64 phi1) delta) (cos.f64 theta) (sin.f64 phi1)) (sin.f64 phi1))
(sin.f64 phi1)
(fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))
(fma.f64 (*.f64 (cos.f64 phi1) delta) (cos.f64 theta) (sin.f64 phi1))
(*.f64 delta (cos.f64 theta))
(*.f64 (cos.f64 theta) delta)
(cos.f64 theta)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (cos.f64 delta))) lambda1)
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (cos.f64 delta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (cos.f64 delta))
#s(literal 1 binary64)
(/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))
(/.f64 #s(literal -1 binary64) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (sin.f64 phi1) (neg.f64 (cos.f64 delta))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (cos.f64 delta))
(cos.f64 delta)
(.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))
(.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (sin.f64 phi1))
(fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(cos.f64 theta)
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(sin.f64 phi1)
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (cos.f64 delta))) lambda1)
lambda1
(atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (cos.f64 delta)))
(/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta))))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(cos.f64 phi1)
phi1
(/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(/.f64 (/.f64 #s(literal 1 binary64) (sin.f64 delta)) (sin.f64 theta))
#s(literal 1 binary64)
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (neg.f64 (sin.f64 phi1)) (sin.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (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 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (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 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))))
(asin.f64 (fma.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)))
(fma.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)

localize265.0ms (1.7%)

Memory

-13.6MiB live, 308.2MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.2890625	(.f64 (sin.f64 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.3500190583802452	(asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
accuracy	0.4747611668419882	(-.f64 (cos.f64 delta) (.f64 (sin.f64 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.6358295941286457	(/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta))))
accuracy	0.234375	(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))
accuracy	0.234375	(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy	0.2890625	(.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))
accuracy	0.4747611668419882	(-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))
accuracy	0.234375	(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy	0.27734375	(.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))
accuracy	0.4747611668419882	(-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))
accuracy	32.22982156468213	#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))
accuracy	0.125	(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
accuracy	0.14453125	(atan2.f64 (.f64 (.f64 (sin.f64 theta) (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.234375	(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy	26.490471811926735	#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
accuracy	0.20703125	(.f64 (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))
accuracy	0.234375	(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy	0.26400375976844204	(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
accuracy	0.4747611668419882	(-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))

Samples

174.0ms

256×

valid

Compiler

Compiled 853 to 52 computations (93.9% saved)

Precisions

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

ival-mult: 23.0ms (21.6% of total)

ival-atan2: 22.0ms (20.7% of total)

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

ival-cos: 16.0ms (15% of total)

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

ival-div: 6.0ms (5.6% of total)

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

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

ival-pow2: 3.0ms (2.8% of total)

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

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

exact: 0.0ms (0% of total)

series120.0ms (0.8%)

Memory

11.9MiB live, 127.4MiB allocated

Counts

28 → 1 032

Calls

Call 1

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

Outputs
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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 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 (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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)) #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)) (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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)) #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 (taylor -inf lambda1) (#s(alt (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor 0 theta) (#s(alt (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1))))) (taylor 0 theta) (#s(alt (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (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 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (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 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) #<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 (+ 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 (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 (* 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 (+ 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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) (patch (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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) (patch (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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) (patch (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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) (patch (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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (patch (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta)))) (taylor 0 theta) (#s(alt (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (patch (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) #<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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (patch (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) #<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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (patch (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) #<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 (+ 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1))))) (taylor 0 theta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1))))) (taylor 0 theta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1))))) (taylor 0 theta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1))))) (taylor 0 theta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin phi1))) (taylor 0 theta) (#s(alt (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor 0 theta) (#s(alt (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (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 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (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 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.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))))))) (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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (taylor 0 theta) (#s(alt #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (patch #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (patch #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (patch #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (patch #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) (patch (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) (patch (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) (patch (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) (patch (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (sin phi1) (* delta (cos phi1)))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))) (* (sin phi1) (+ (sin phi1) (* delta (cos phi1))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (+ (sin phi1) (* delta (cos phi1)))) (* (pow theta 2) (+ (* -1/2 (* delta (* (cos phi1) (sin phi1)))) (* 1/24 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1)))))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (+ (sin phi1) (* delta (cos phi1)))) (* (pow theta 2) (+ (* -1/2 (* delta (* (cos phi1) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))) (* 1/24 (* delta (* (cos phi1) (sin phi1))))))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (sin.f64 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 (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 (* (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 (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf theta) (#s(alt (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf theta) (#s(alt (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf theta) (#s(alt (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf theta) (#s(alt (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.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 (+ 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 (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 (* (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 (+ 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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) (patch (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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) (patch (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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) (patch (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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) (patch (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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (patch (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (patch (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (patch (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (patch (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) #<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 (+ 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf theta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf theta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf theta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf theta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor inf theta) (#s(alt (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor inf theta) (#s(alt (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor inf theta) (#s(alt (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor inf theta) (#s(alt (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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 #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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (patch #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (patch #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (patch #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (patch #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) (patch (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) (patch (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) (patch (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) (patch (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))) (taylor inf theta) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))) (taylor inf theta) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))) (taylor inf theta) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))) (taylor inf theta) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (sin.f64 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 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 (* (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 (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf theta) (#s(alt (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf theta) (#s(alt (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf theta) (#s(alt (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf theta) (#s(alt (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.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 (+ 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 (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 (* (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 (+ 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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) (patch (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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) (patch (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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) (patch (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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) (patch (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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (patch (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (patch (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (patch (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (patch (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) #<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 (+ 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf theta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf theta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf theta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf theta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor -inf theta) (#s(alt (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor -inf theta) (#s(alt (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor -inf theta) (#s(alt (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor -inf theta) (#s(alt (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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 #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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (patch #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (patch #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (patch #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (patch #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) (patch (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) (patch (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) (patch (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) (patch (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))) (taylor -inf theta) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))) (taylor -inf theta) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))) (taylor -inf theta) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))) (taylor -inf theta) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (sin.f64 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 -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 (* (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 (* phi1 (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))) (taylor 0 phi1) (#s(alt (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.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 (+ 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 (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 (+ 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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) (patch (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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) (patch (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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) (patch (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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) (patch (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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor 0 phi1) (#s(alt (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (patch (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta))) (taylor 0 phi1) (#s(alt (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (patch (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) #<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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (patch (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) #<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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (patch (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#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 (+ 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (pow phi1 2) (taylor 0 phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2)))) (taylor 0 phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 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 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 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 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (taylor 0 phi1) (#s(alt (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (* 1/12 (* (cos theta) (sin delta))))))))))) (taylor 0 phi1) (#s(alt (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (+ (* 1/12 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/144 (* (cos theta) (sin delta))) (+ (* -1/240 (* (cos theta) (sin delta))) (+ (* -1/720 (* (cos theta) (sin delta))) (* -1/5040 (* (cos theta) (sin delta)))))))))))))))) (taylor 0 phi1) (#s(alt (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.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))))))) (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 (* phi1 (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (patch #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))) (taylor 0 phi1) (#s(alt #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (patch #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (patch #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (patch #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) (patch (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) (patch (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) (patch (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) (patch (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* delta (* phi1 (cos theta))) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ phi1 (* delta (cos theta)))) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* delta (cos theta)) (* phi1 (+ 1 (* phi1 (+ (* -1/2 (* delta (cos theta))) (* -1/6 (* delta (cos theta))))))))) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* delta (cos theta)) (* phi1 (+ 1 (* phi1 (+ (* -1/2 (* delta (cos theta))) (+ (* -1/3 phi1) (* -1/6 (* delta (cos theta)))))))))) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))) (taylor 0 phi1) (#s(alt (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #<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 (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 (* 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 (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf phi1) (#s(alt (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf phi1) (#s(alt (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf phi1) (#s(alt (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf phi1) (#s(alt (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.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 (+ 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 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 (+ 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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) (patch (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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) (patch (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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) (patch (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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) (patch (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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (patch (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (patch (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (patch (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (patch (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) #<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 (+ 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor inf phi1) (#s(alt (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor inf phi1) (#s(alt (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor inf phi1) (#s(alt (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor inf phi1) (#s(alt (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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 #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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (patch #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (patch #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (patch #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (patch #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) (patch (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) (patch (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) (patch (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) (patch (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))) (taylor inf phi1) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))) (taylor inf phi1) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))) (taylor inf phi1) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))) (taylor inf phi1) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (sin.f64 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 (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 (* (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 (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.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 (+ 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 -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 (+ 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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) (patch (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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) (patch (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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) (patch (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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) (patch (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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (patch (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (patch (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (patch (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (patch (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) #<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 (+ 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor -inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor -inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor -inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor -inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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 #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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (patch #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (patch #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (patch #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (patch #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) (patch (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) (patch (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) (patch (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) (patch (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (sin.f64 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 (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 (* (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 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.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 (+ 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 (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 (* 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 (+ 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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) (patch (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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) (patch (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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) (patch (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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) (patch (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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (sin theta))) (taylor 0 delta) (#s(alt (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (patch (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta)))) (taylor 0 delta) (#s(alt (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (patch (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) #<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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (patch (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) #<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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (patch (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) #<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 (+ 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor 0 delta) (#s(alt (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* (cos phi1) (* (cos theta) (sin phi1))))) (taylor 0 delta) (#s(alt (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/120 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))))))) (taylor 0 delta) (#s(alt (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/120 (* (cos phi1) (* (cos theta) (sin phi1)))))))))) (taylor 0 delta) (#s(alt (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.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 (pow (sin phi1) 2) (taylor 0 delta) (#s(alt #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (patch #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (patch #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (patch #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (patch #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) (patch (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) (patch (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) (patch (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) (patch (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor 0 delta) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor 0 delta) (#s(alt (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.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 (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 (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 (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf delta) (#s(alt (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf delta) (#s(alt (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf delta) (#s(alt (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf delta) (#s(alt (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.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 (+ 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 (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 (* (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 (+ 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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) (patch (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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) (patch (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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) (patch (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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) (patch (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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (patch (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (patch (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (patch (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (patch (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) #<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 (+ 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor inf delta) (#s(alt (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor inf delta) (#s(alt (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor inf delta) (#s(alt (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor inf delta) (#s(alt (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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 #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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (patch #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (patch #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (patch #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (patch #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) (patch (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) (patch (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) (patch (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) (patch (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor inf delta) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (/ (pow (sin phi1) 2) delta))) (taylor inf delta) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (/ (pow (sin phi1) 2) delta))) (taylor inf delta) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (/ (pow (sin phi1) 2) delta))) (taylor inf delta) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (sin.f64 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 (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 (* (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 (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf delta) (#s(alt (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf delta) (#s(alt (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf delta) (#s(alt (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf delta) (#s(alt (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.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 (+ 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 (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 (* (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 (+ 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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))) (patch (+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) (patch (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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) (patch (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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) (patch (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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))) (patch (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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (patch (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (patch (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (patch (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (patch (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) #<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 (+ 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor -inf delta) (#s(alt (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor -inf delta) (#s(alt (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor -inf delta) (#s(alt (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))) (taylor -inf delta) (#s(alt (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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 #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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (patch #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (patch #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (patch #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (patch #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) (patch (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) (patch (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) (patch (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) (patch (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (taylor -inf delta) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* -1 (/ (pow (sin phi1) 2) delta))))) (taylor -inf delta) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* -1 (/ (pow (sin phi1) 2) delta))))) (taylor -inf delta) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* -1 (/ (pow (sin phi1) 2) delta))))) (taylor -inf delta) (#s(alt (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (patch (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (patch (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (patch (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (sin.f64 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 (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 (* (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>) () ())) ())

Calls

12 calls:

Time	Variable		Point	Expression
9.0ms	delta	@	inf	((+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))))) (* (* (sin theta) (sin delta)) (cos phi1)) (+ 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 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (sin theta) (sin delta)) (+ 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 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)))))) (/ (cos phi1) (/ 1 (* (sin theta) (sin delta)))) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (+ lambda1 (atan2 (/ (cos phi1) (/ 1 (* (sin theta) (sin delta)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (/ (cos phi1) (/ 1 (* (sin theta) (sin delta)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))) (pow (sin phi1) 2) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (+ (* (* delta (cos theta)) (cos phi1)) (sin phi1))) (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))
8.0ms	phi1	@	inf	((+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))))) (* (* (sin theta) (sin delta)) (cos phi1)) (+ 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 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (sin theta) (sin delta)) (+ 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 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)))))) (/ (cos phi1) (/ 1 (* (sin theta) (sin delta)))) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (+ lambda1 (atan2 (/ (cos phi1) (/ 1 (* (sin theta) (sin delta)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (/ (cos phi1) (/ 1 (* (sin theta) (sin delta)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))) (pow (sin phi1) 2) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (+ (* (* delta (cos theta)) (cos phi1)) (sin phi1))) (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))
5.0ms	phi1	@	-inf	((+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))))) (* (* (sin theta) (sin delta)) (cos phi1)) (+ 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 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (sin theta) (sin delta)) (+ 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 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)))))) (/ (cos phi1) (/ 1 (* (sin theta) (sin delta)))) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (+ lambda1 (atan2 (/ (cos phi1) (/ 1 (* (sin theta) (sin delta)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (/ (cos phi1) (/ 1 (* (sin theta) (sin delta)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))) (pow (sin phi1) 2) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (+ (* (* delta (cos theta)) (cos phi1)) (sin phi1))) (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))
5.0ms	theta	@	inf	((+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))))) (* (* (sin theta) (sin delta)) (cos phi1)) (+ 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 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (sin theta) (sin delta)) (+ 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 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)))))) (/ (cos phi1) (/ 1 (* (sin theta) (sin delta)))) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (+ lambda1 (atan2 (/ (cos phi1) (/ 1 (* (sin theta) (sin delta)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (/ (cos phi1) (/ 1 (* (sin theta) (sin delta)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))) (pow (sin phi1) 2) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (+ (* (* delta (cos theta)) (cos phi1)) (sin phi1))) (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))
5.0ms	delta	@	-inf	((+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))))) (* (* (sin theta) (sin delta)) (cos phi1)) (+ 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 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (sin theta) (sin delta)) (+ 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 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)))))) (/ (cos phi1) (/ 1 (* (sin theta) (sin delta)))) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (+ lambda1 (atan2 (/ (cos phi1) (/ 1 (* (sin theta) (sin delta)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (/ (cos phi1) (/ 1 (* (sin theta) (sin delta)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))) (pow (sin phi1) 2) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (+ (* (* delta (cos theta)) (cos phi1)) (sin phi1))) (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))

simplify252.0ms (1.6%)

Memory

-0.2MiB live, 224.5MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	427	24698
1	1515	23159
2	5396	22971
0	8539	21912

Stop Event

1×	iter limit
1×	node limit

Counts

1 032 → 1 022

Calls

Call 1

Inputs
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin 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)))
(* 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
(* 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
(* 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
(* 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) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
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
(* -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
(* -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
(* -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)))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1))))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (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))))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* 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))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(- (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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* 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 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)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin 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))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin 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))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(* (cos phi1) (* (sin delta) (sin phi1)))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))
(+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))
(+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (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)))))))))
(- (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)))))
(* (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)))))))))
(- (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)))))
(* (sin phi1) (+ (sin phi1) (* delta (cos phi1))))
(+ (* -1/2 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))) (* (sin phi1) (+ (sin phi1) (* delta (cos phi1)))))
(+ (* (sin phi1) (+ (sin phi1) (* delta (cos phi1)))) (* (pow theta 2) (+ (* -1/2 (* delta (* (cos phi1) (sin phi1)))) (* 1/24 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))))))
(+ (* (sin phi1) (+ (sin phi1) (* delta (cos phi1)))) (* (pow theta 2) (+ (* -1/2 (* delta (* (cos phi1) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))) (* 1/24 (* delta (* (cos phi1) (sin phi1)))))))))
(- (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)))))
(* (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)))))))))
(- (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)))))
(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)))))
(* (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)))))))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(- (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))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (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 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))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(- (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))))))
(* (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)))))
(- (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))))))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(- (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))))))
(* (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)))))
(- (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)))))
(* (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)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(- (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))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (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 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))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(- (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))))))
(* (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)))))
(- (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))))))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(- (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))))))
(* (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)))))
(- (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)))))
(* (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)))))
(* 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))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(* (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))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (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 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)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(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)))))
(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))))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (* 1/12 (* (cos theta) (sin delta)))))))))))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (+ (* 1/12 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/144 (* (cos theta) (sin delta))) (+ (* -1/240 (* (cos theta) (sin delta))) (+ (* -1/720 (* (cos theta) (sin delta))) (* -1/5040 (* (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)))))
(* 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))))
(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)))))
(* delta (* phi1 (cos theta)))
(* phi1 (+ phi1 (* delta (cos theta))))
(* phi1 (+ (* delta (cos theta)) (* phi1 (+ 1 (* phi1 (+ (* -1/2 (* delta (cos theta))) (* -1/6 (* delta (cos theta)))))))))
(* phi1 (+ (* delta (cos theta)) (* phi1 (+ 1 (* phi1 (+ (* -1/2 (* delta (cos theta))) (+ (* -1/3 phi1) (* -1/6 (* delta (cos theta))))))))))
(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)))))
(* 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))))
(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)))))
(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))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(- (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))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (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 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))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(- (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))))))
(* (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)))))
(- (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))))))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(- (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))))))
(* (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)))))
(- (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)))))
(* (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)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(- (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))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (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 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))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(- (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))))))
(* (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)))))
(- (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))))))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(- (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))))))
(* (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)))))
(- (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)))))
(* (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))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(* 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)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* 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))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(- 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))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* 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)))))))))
(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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(- 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))
(* delta (* (cos phi1) (* (cos theta) (sin phi1))))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* (cos phi1) (* (cos theta) (sin phi1)))))
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/120 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1)))))))))
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/120 (* (cos phi1) (* (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))
(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))
(- 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))
(pow (sin phi1) 2)
(+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))
(+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))
(+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))
(- 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))
(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))
(- 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))
(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)))))
(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))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(- (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))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (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 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))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(- (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))))))
(* (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)))))
(- (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))))))
(* delta (* (cos phi1) (* (cos theta) (sin phi1))))
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (/ (pow (sin phi1) 2) delta)))
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (/ (pow (sin phi1) 2) delta)))
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (/ (pow (sin phi1) 2) 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))))))
(* (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)))))
(- (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)))))
(* (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)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(- (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))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (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 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))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(- (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))))))
(* (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)))))
(- (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))))))
(* delta (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* -1 (/ (pow (sin phi1) 2) delta)))))
(* -1 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* -1 (/ (pow (sin phi1) 2) delta)))))
(* -1 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* -1 (/ (pow (sin phi1) 2) 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))))))
(* (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)))))
(- (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)))))
(* (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)))))

Outputs
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 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 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) 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 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) 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 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 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 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) 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 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) 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 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 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 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) 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 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) 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 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 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 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) 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 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) 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 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) 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 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (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 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (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 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) 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 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (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 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (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 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) 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 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (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 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (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 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) 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 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (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 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (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 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1))))
(.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (fma.f64 #s(literal -1/2 binary64) (.f64 theta (.f64 theta (cos.f64 phi1))) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1) (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (.f64 theta theta) #s(literal -1/2 binary64))) (*.f64 theta theta)))
(+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (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 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (fma.f64 #s(literal -1/2 binary64) (.f64 theta (.f64 theta (cos.f64 phi1))) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (pow.f64 theta #s(literal 4 binary64)) (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (.f64 theta theta) #s(literal 1/24 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* theta (* (cos phi1) (sin delta)))
(.f64 (.f64 theta (cos.f64 phi1)) (sin.f64 delta))
(* 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))))))))
(fma.f64 (pow.f64 theta #s(literal 3 binary64)) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal 1/120 binary64) (.f64 theta theta) #s(literal -1/6 binary64))) (.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 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)))))))))
(.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (pow.f64 theta #s(literal 4 binary64)) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 binary64))))) theta)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (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)))))))
(fma.f64 (pow.f64 theta #s(literal 3 binary64)) (.f64 (sin.f64 delta) (fma.f64 #s(literal 1/120 binary64) (.f64 theta theta) #s(literal -1/6 binary64))) (*.f64 theta (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 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta) (.f64 (pow.f64 theta #s(literal 4 binary64)) (.f64 (sin.f64 delta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 binary64))))) theta)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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)))))
(fma.f64 (sin.f64 phi1) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 theta theta)) (.f64 (sin.f64 delta) (cos.f64 phi1)) (neg.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.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)))))
(fma.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal -1/24 binary64) (.f64 theta theta) #s(literal 1/2 binary64))) (.f64 theta theta) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (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 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (sin.f64 delta)) (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/720 binary64) (.f64 theta theta) #s(literal -1/24 binary64))) (.f64 theta theta))) (.f64 theta theta) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* theta (* (cos phi1) (sin delta)))
(.f64 (.f64 theta (cos.f64 phi1)) (sin.f64 delta))
(* 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))))))))
(fma.f64 (pow.f64 theta #s(literal 3 binary64)) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal 1/120 binary64) (.f64 theta theta) #s(literal -1/6 binary64))) (.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 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)))))))))
(.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (pow.f64 theta #s(literal 4 binary64)) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 binary64))))) theta)
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(fma.f64 (sin.f64 delta) (fma.f64 #s(literal -1/2 binary64) (.f64 theta (.f64 theta (cos.f64 phi1))) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 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))))))))
(fma.f64 (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (.f64 theta theta) #s(literal -1/2 binary64))) (.f64 theta theta) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.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 phi1) (cos.f64 delta) (fma.f64 (sin.f64 delta) (+.f64 (cos.f64 phi1) (.f64 (.f64 theta theta) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 theta #s(literal 4 binary64)) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 theta theta) #s(literal 1/24 binary64))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(fma.f64 (sin.f64 phi1) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 theta theta)) (.f64 (sin.f64 delta) (cos.f64 phi1)) (neg.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.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))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(fma.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal -1/24 binary64) (.f64 theta theta) #s(literal 1/2 binary64))) (.f64 theta theta) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (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))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(fma.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (sin.f64 delta)) (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/720 binary64) (.f64 theta theta) #s(literal -1/24 binary64))) (.f64 theta theta))) (.f64 theta theta) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin phi1)))
(.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))
(.f64 (fma.f64 (.f64 theta theta) #s(literal -1/2 binary64) #s(literal 1 binary64)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))
(+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))
(.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (+.f64 (fma.f64 (.f64 theta theta) #s(literal -1/2 binary64) #s(literal 1 binary64)) (.f64 (.f64 theta theta) (.f64 #s(literal 1/24 binary64) (.f64 theta theta)))))
(+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (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 (fma.f64 (.f64 theta theta) #s(literal -1/2 binary64) #s(literal 1 binary64)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (.f64 (pow.f64 theta #s(literal 4 binary64)) (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (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) (sin delta)))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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)))))
(fma.f64 (sin.f64 phi1) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 theta theta)) (.f64 (sin.f64 delta) (cos.f64 phi1)) (neg.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.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)))))
(fma.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal -1/24 binary64) (.f64 theta theta) #s(literal 1/2 binary64))) (.f64 theta theta) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (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 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (sin.f64 delta)) (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/720 binary64) (.f64 theta theta) #s(literal -1/24 binary64))) (.f64 theta theta))) (.f64 theta theta) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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) (fma.f64 #s(literal -1/2 binary64) (.f64 theta (.f64 theta (cos.f64 phi1))) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 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))))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1) (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (.f64 theta theta) #s(literal -1/2 binary64))) (*.f64 theta theta)))
(+ (* (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 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (fma.f64 #s(literal -1/2 binary64) (.f64 theta (.f64 theta (cos.f64 phi1))) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (pow.f64 theta #s(literal 4 binary64)) (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (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) (sin delta)))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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)))))
(fma.f64 (sin.f64 phi1) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 theta theta)) (.f64 (sin.f64 delta) (cos.f64 phi1)) (neg.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.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)))))
(fma.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal -1/24 binary64) (.f64 theta theta) #s(literal 1/2 binary64))) (.f64 theta theta) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (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 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (sin.f64 delta)) (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/720 binary64) (.f64 theta theta) #s(literal -1/24 binary64))) (.f64 theta theta))) (.f64 theta theta) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))
(* (sin phi1) (+ (sin phi1) (* delta (cos phi1))))
(*.f64 (fma.f64 delta (cos.f64 phi1) (sin.f64 phi1)) (sin.f64 phi1))
(+ (* -1/2 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))) (* (sin phi1) (+ (sin phi1) (* delta (cos phi1)))))
(.f64 (sin.f64 phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) delta) (.f64 theta (.f64 theta (cos.f64 phi1))) (fma.f64 delta (cos.f64 phi1) (sin.f64 phi1))))
(+ (* (sin phi1) (+ (sin phi1) (* delta (cos phi1)))) (* (pow theta 2) (+ (* -1/2 (* delta (* (cos phi1) (sin phi1)))) (* 1/24 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))))))
(fma.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) delta) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (.f64 theta theta) #s(literal -1/2 binary64))) (.f64 theta theta) (.f64 (fma.f64 delta (cos.f64 phi1) (sin.f64 phi1)) (sin.f64 phi1)))
(+ (* (sin phi1) (+ (sin phi1) (* delta (cos phi1)))) (* (pow theta 2) (+ (* -1/2 (* delta (* (cos phi1) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))) (* 1/24 (* delta (* (cos phi1) (sin phi1)))))))))
(fma.f64 (sin.f64 phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) delta) (.f64 theta (.f64 theta (cos.f64 phi1))) (fma.f64 delta (cos.f64 phi1) (sin.f64 phi1))) (.f64 (pow.f64 theta #s(literal 4 binary64)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) delta (.f64 #s(literal -1/720 binary64) (.f64 (*.f64 theta theta) delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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)))))
(fma.f64 (sin.f64 phi1) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 theta theta)) (.f64 (sin.f64 delta) (cos.f64 phi1)) (neg.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.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)))))
(fma.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal -1/24 binary64) (.f64 theta theta) #s(literal 1/2 binary64))) (.f64 theta theta) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (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 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (sin.f64 delta)) (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/720 binary64) (.f64 theta theta) #s(literal -1/24 binary64))) (.f64 theta theta))) (.f64 theta theta) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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) (fma.f64 #s(literal -1/2 binary64) (.f64 theta (.f64 theta (cos.f64 phi1))) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 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))))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1) (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (.f64 theta theta) #s(literal -1/2 binary64))) (*.f64 theta theta)))
(+ (* (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 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (fma.f64 #s(literal -1/2 binary64) (.f64 theta (.f64 theta (cos.f64 phi1))) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (pow.f64 theta #s(literal 4 binary64)) (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (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) (sin delta)))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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)))))
(fma.f64 (sin.f64 phi1) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 theta theta)) (.f64 (sin.f64 delta) (cos.f64 phi1)) (neg.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.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)))))
(fma.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal -1/24 binary64) (.f64 theta theta) #s(literal 1/2 binary64))) (.f64 theta theta) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (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 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (sin.f64 delta)) (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/720 binary64) (.f64 theta theta) #s(literal -1/24 binary64))) (.f64 theta theta))) (.f64 theta theta) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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) (fma.f64 #s(literal -1/2 binary64) (.f64 theta (.f64 theta (cos.f64 phi1))) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 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))))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1) (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (.f64 theta theta) #s(literal -1/2 binary64))) (*.f64 theta theta)))
(+ (* (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 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (fma.f64 #s(literal -1/2 binary64) (.f64 theta (.f64 theta (cos.f64 phi1))) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (pow.f64 theta #s(literal 4 binary64)) (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (.f64 theta theta) #s(literal 1/24 binary64)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(.f64 (.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(.f64 (.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(.f64 (.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(.f64 (.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) delta) (cos.f64 phi1) (sin.f64 phi1)) (sin.f64 phi1))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) delta) (cos.f64 phi1) (sin.f64 phi1)) (sin.f64 phi1))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) delta) (cos.f64 phi1) (sin.f64 phi1)) (sin.f64 phi1))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) delta) (cos.f64 phi1) (sin.f64 phi1)) (sin.f64 phi1))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(.f64 (.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(.f64 (.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(.f64 (.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(.f64 (.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) delta) (cos.f64 phi1) (sin.f64 phi1)) (sin.f64 phi1))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) delta) (cos.f64 phi1) (sin.f64 phi1)) (sin.f64 phi1))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) delta) (cos.f64 phi1) (sin.f64 phi1)) (sin.f64 phi1))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) delta) (cos.f64 phi1) (sin.f64 phi1)) (sin.f64 phi1))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* phi1 (* (cos theta) (sin delta)))
(.f64 (.f64 phi1 (sin.f64 delta)) (cos.f64 theta))
(* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))
(.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))
(.f64 (fma.f64 (fma.f64 (.f64 (sin.f64 delta) phi1) (.f64 (cos.f64 theta) #s(literal -2/3 binary64)) (cos.f64 delta)) phi1 (.f64 (cos.f64 theta) (sin.f64 delta))) phi1)
(* 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 (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/3 binary64) (cos.f64 delta)) phi1 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) #s(literal -2/3 binary64)))) phi1 (cos.f64 delta)) phi1 (*.f64 (cos.f64 theta) (sin.f64 delta))) phi1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(+ (* (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (.f64 phi1 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(+ (* (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 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 theta) (sin.f64 delta)) (.f64 (pow.f64 phi1 #s(literal 4 binary64)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 (.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) 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 (fma.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta) (.f64 (neg.f64 (fma.f64 (.f64 (sin.f64 delta) phi1) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)) (cos.f64 delta))) phi1)) 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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(+ (* (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (.f64 phi1 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(+ (* (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 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 theta) (sin.f64 delta)) (.f64 (pow.f64 phi1 #s(literal 4 binary64)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 (.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
(* (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 (cos.f64 delta) phi1))
(+ (* phi1 (+ (cos delta) (* -1/2 (* phi1 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta)))
(fma.f64 (cos.f64 delta) phi1 (.f64 (sin.f64 delta) (fma.f64 (.f64 phi1 phi1) (*.f64 #s(literal -1/2 binary64) (cos.f64 theta)) (cos.f64 theta))))
(+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* phi1 (cos delta))))))) (* (cos theta) (sin delta)))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 delta)) phi1 (.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 delta)) (cos.f64 theta))) phi1 (cos.f64 delta)) phi1 (.f64 (cos.f64 theta) (sin.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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) 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 (fma.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta) (.f64 (neg.f64 (fma.f64 (.f64 (sin.f64 delta) phi1) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)) (cos.f64 delta))) phi1)) phi1 (cos.f64 delta))
(pow phi1 2)
(*.f64 phi1 phi1)
(* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))
(fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal -1/3 binary64) (*.f64 phi1 phi1))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))
(fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) (fma.f64 #s(literal 2/45 binary64) (.f64 phi1 phi1) #s(literal -1/3 binary64)) (.f64 phi1 phi1))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))
(fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) (fma.f64 (fma.f64 #s(literal -1/315 binary64) (.f64 phi1 phi1) #s(literal 2/45 binary64)) (.f64 phi1 phi1) #s(literal -1/3 binary64)) (*.f64 phi1 phi1))
(* phi1 (* (cos theta) (sin delta)))
(.f64 (.f64 phi1 (sin.f64 delta)) (cos.f64 theta))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))
(fma.f64 (pow.f64 phi1 #s(literal 3 binary64)) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) #s(literal -2/3 binary64))) (.f64 (.f64 phi1 (sin.f64 delta)) (cos.f64 theta)))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (* 1/12 (* (cos theta) (sin delta)))))))))))
(.f64 (fma.f64 (fma.f64 (.f64 (.f64 phi1 phi1) (.f64 (cos.f64 theta) (sin.f64 delta))) #s(literal 2/15 binary64) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) #s(literal -2/3 binary64)))) (.f64 phi1 phi1) (.f64 (cos.f64 theta) (sin.f64 delta))) phi1)
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (+ (* 1/12 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/144 (* (cos theta) (sin delta))) (+ (* -1/240 (* (cos theta) (sin delta))) (+ (* -1/720 (* (cos theta) (sin delta))) (* -1/5040 (* (cos theta) (sin delta))))))))))))))))
(.f64 (fma.f64 (fma.f64 #s(literal -2/3 binary64) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 2/15 binary64) (.f64 (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal -4/315 binary64)) (.f64 phi1 phi1))) (.f64 phi1 phi1))) (.f64 phi1 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) phi1)
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) 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 (fma.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta) (.f64 (neg.f64 (fma.f64 (.f64 (sin.f64 delta) phi1) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)) (cos.f64 delta))) phi1)) phi1 (cos.f64 delta))
(* phi1 (* (cos theta) (sin delta)))
(.f64 (.f64 phi1 (sin.f64 delta)) (cos.f64 theta))
(* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))
(.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))
(.f64 (fma.f64 (fma.f64 (.f64 (sin.f64 delta) phi1) (.f64 (cos.f64 theta) #s(literal -2/3 binary64)) (cos.f64 delta)) phi1 (.f64 (cos.f64 theta) (sin.f64 delta))) phi1)
(* 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 (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/3 binary64) (cos.f64 delta)) phi1 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) #s(literal -2/3 binary64)))) phi1 (cos.f64 delta)) phi1 (*.f64 (cos.f64 theta) (sin.f64 delta))) phi1)
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) 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 (fma.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta) (.f64 (neg.f64 (fma.f64 (.f64 (sin.f64 delta) phi1) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)) (cos.f64 delta))) phi1)) phi1 (cos.f64 delta))
(* delta (* phi1 (cos theta)))
(.f64 (.f64 (cos.f64 theta) delta) phi1)
(* phi1 (+ phi1 (* delta (cos theta))))
(*.f64 (fma.f64 (cos.f64 theta) delta phi1) phi1)
(* phi1 (+ (* delta (cos theta)) (* phi1 (+ 1 (* phi1 (+ (* -1/2 (* delta (cos theta))) (* -1/6 (* delta (cos theta)))))))))
(.f64 (fma.f64 (fma.f64 (.f64 #s(literal -2/3 binary64) (.f64 (cos.f64 theta) delta)) phi1 #s(literal 1 binary64)) phi1 (.f64 (cos.f64 theta) delta)) phi1)
(* phi1 (+ (* delta (cos theta)) (* phi1 (+ 1 (* phi1 (+ (* -1/2 (* delta (cos theta))) (+ (* -1/3 phi1) (* -1/6 (* delta (cos theta))))))))))
(.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -2/3 binary64) (.f64 (cos.f64 theta) delta) (.f64 #s(literal -1/3 binary64) phi1)) phi1 #s(literal 1 binary64)) phi1 (.f64 (cos.f64 theta) delta)) phi1)
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) 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 (fma.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta) (.f64 (neg.f64 (fma.f64 (.f64 (sin.f64 delta) phi1) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)) (cos.f64 delta))) phi1)) phi1 (cos.f64 delta))
(* phi1 (* (cos theta) (sin delta)))
(.f64 (.f64 phi1 (sin.f64 delta)) (cos.f64 theta))
(* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))
(.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))
(.f64 (fma.f64 (fma.f64 (.f64 (sin.f64 delta) phi1) (.f64 (cos.f64 theta) #s(literal -2/3 binary64)) (cos.f64 delta)) phi1 (.f64 (cos.f64 theta) (sin.f64 delta))) phi1)
(* 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 (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/3 binary64) (cos.f64 delta)) phi1 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) #s(literal -2/3 binary64)))) phi1 (cos.f64 delta)) phi1 (*.f64 (cos.f64 theta) (sin.f64 delta))) phi1)
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) 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 (fma.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta) (.f64 (neg.f64 (fma.f64 (.f64 (sin.f64 delta) phi1) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)) (cos.f64 delta))) phi1)) phi1 (cos.f64 delta))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(* phi1 (* (cos theta) (sin delta)))
(.f64 (.f64 phi1 (sin.f64 delta)) (cos.f64 theta))
(* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))
(.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))
(.f64 (fma.f64 (fma.f64 (.f64 (sin.f64 delta) phi1) (.f64 (cos.f64 theta) #s(literal -2/3 binary64)) (cos.f64 delta)) phi1 (.f64 (cos.f64 theta) (sin.f64 delta))) phi1)
(* 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 (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/3 binary64) (cos.f64 delta)) phi1 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) #s(literal -2/3 binary64)))) phi1 (cos.f64 delta)) phi1 (*.f64 (cos.f64 theta) (sin.f64 delta))) phi1)
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(.f64 (.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(.f64 (.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(.f64 (.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(.f64 (.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) delta) (cos.f64 phi1) (sin.f64 phi1)) (sin.f64 phi1))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) delta) (cos.f64 phi1) (sin.f64 phi1)) (sin.f64 phi1))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) delta) (cos.f64 phi1) (sin.f64 phi1)) (sin.f64 phi1))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) delta) (cos.f64 phi1) (sin.f64 phi1)) (sin.f64 phi1))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(.f64 (.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(.f64 (.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(.f64 (.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(.f64 (.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) delta) (cos.f64 phi1) (sin.f64 phi1)) (sin.f64 phi1))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) delta) (cos.f64 phi1) (sin.f64 phi1)) (sin.f64 phi1))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) delta) (cos.f64 phi1) (sin.f64 phi1)) (sin.f64 phi1))
(* (sin phi1) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) delta) (cos.f64 phi1) (sin.f64 phi1)) (sin.f64 phi1))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) delta) (cos.f64 phi1) (sin.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 (.f64 (sin.f64 phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) delta) (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1)))) delta (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 (fma.f64 (.f64 #s(literal -1/2 binary64) delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* delta (* (cos phi1) (sin theta)))
(.f64 (.f64 (sin.f64 theta) delta) (cos.f64 phi1))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 delta (.f64 (.f64 #s(literal -1/6 binary64) 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))))))))
(fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (*.f64 (sin.f64 theta) delta) (cos.f64 phi1)))
(* 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 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (.f64 (sin.f64 theta) (cos.f64 phi1)) (.f64 (pow.f64 delta #s(literal 4 binary64)) (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 (*.f64 delta delta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))))) 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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* delta (sin theta))
(*.f64 (sin.f64 theta) delta)
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(.f64 (sin.f64 theta) (fma.f64 delta (.f64 (*.f64 #s(literal -1/6 binary64) delta) delta) delta))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) 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 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (sin.f64 theta) (.f64 (pow.f64 delta #s(literal 4 binary64)) (.f64 (sin.f64 theta) (fma.f64 (*.f64 delta delta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))))) 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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(- 1 (pow (sin phi1) 2))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(.f64 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (cos.f64 theta) (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 (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64)) delta) (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta (.f64 (cos.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 (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 theta) (.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) (.f64 delta (cos.f64 phi1))) (.f64 (cos.f64 theta) (sin.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64))) delta)) delta (.f64 (cos.f64 phi1) (cos.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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* delta (* (cos phi1) (sin theta)))
(.f64 (.f64 (sin.f64 theta) delta) (cos.f64 phi1))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 delta (.f64 (.f64 #s(literal -1/6 binary64) 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))))))))
(fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (*.f64 (sin.f64 theta) delta) (cos.f64 phi1)))
(* 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 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (.f64 (sin.f64 theta) (cos.f64 phi1)) (.f64 (pow.f64 delta #s(literal 4 binary64)) (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 (*.f64 delta delta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))))) delta)
(sin phi1)
(sin.f64 phi1)
(+ (sin phi1) (* delta (* (cos phi1) (cos theta))))
(fma.f64 (*.f64 (cos.f64 theta) delta) (cos.f64 phi1) (sin.f64 phi1))
(+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (cos.f64 phi1))) delta (sin.f64 phi1))
(+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (* delta (* (cos phi1) (cos theta)))))) (* (cos phi1) (cos theta)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) (.f64 delta (cos.f64 phi1))) (cos.f64 theta) (.f64 #s(literal -1/2 binary64) (sin.f64 phi1))) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) 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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(- 1 (pow (sin phi1) 2))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(.f64 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (cos.f64 theta) (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 (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64)) delta) (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta (.f64 (cos.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 (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 theta) (.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) (.f64 delta (cos.f64 phi1))) (.f64 (cos.f64 theta) (sin.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64))) delta)) delta (.f64 (cos.f64 phi1) (cos.f64 phi1)))
(* delta (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (.f64 (sin.f64 phi1) delta) (*.f64 (cos.f64 theta) (cos.f64 phi1)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* (cos phi1) (* (cos theta) (sin phi1)))))
(.f64 (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (fma.f64 delta (.f64 (*.f64 #s(literal -1/6 binary64) delta) delta) delta))
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/120 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1)))))))))
(.f64 (.f64 (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (+.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (.f64 (.f64 delta delta) (.f64 (*.f64 delta delta) #s(literal 1/120 binary64))))) delta)
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/120 (* (cos phi1) (* (cos theta) (sin phi1))))))))))
(.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (pow.f64 delta #s(literal 4 binary64)) (.f64 (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (fma.f64 (*.f64 delta delta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))))) delta)
(- 1 (pow (sin phi1) 2))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(.f64 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (cos.f64 theta) (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 (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64)) delta) (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta (.f64 (cos.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 (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 theta) (.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) (.f64 delta (cos.f64 phi1))) (.f64 (cos.f64 theta) (sin.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64))) delta)) delta (.f64 (cos.f64 phi1) (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))
(.f64 (fma.f64 (.f64 (cos.f64 theta) delta) (cos.f64 phi1) (sin.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 (.f64 (sin.f64 phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) delta) (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1)))) delta (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 (fma.f64 (.f64 #s(literal -1/2 binary64) delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(.f64 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (cos.f64 theta) (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 (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64)) delta) (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta (.f64 (cos.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 (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 theta) (.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) (.f64 delta (cos.f64 phi1))) (.f64 (cos.f64 theta) (sin.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64))) delta)) delta (.f64 (cos.f64 phi1) (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))
(.f64 (fma.f64 (.f64 (cos.f64 theta) delta) (cos.f64 phi1) (sin.f64 phi1)) (sin.f64 phi1))
(+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))
(.f64 (fma.f64 (.f64 (cos.f64 theta) delta) (cos.f64 phi1) (sin.f64 phi1)) (sin.f64 phi1))
(+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))
(.f64 (fma.f64 (.f64 (cos.f64 theta) delta) (cos.f64 phi1) (sin.f64 phi1)) (sin.f64 phi1))
(- 1 (pow (sin phi1) 2))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(.f64 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (cos.f64 theta) (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 (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64)) delta) (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta (.f64 (cos.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 (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 theta) (.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) (.f64 delta (cos.f64 phi1))) (.f64 (cos.f64 theta) (sin.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64))) delta)) delta (.f64 (cos.f64 phi1) (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))
(.f64 (fma.f64 (.f64 (cos.f64 theta) delta) (cos.f64 phi1) (sin.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 (.f64 (sin.f64 phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) delta) (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1)))) delta (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 (fma.f64 (.f64 #s(literal -1/2 binary64) delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(.f64 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (cos.f64 theta) (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 (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64)) delta) (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta (.f64 (cos.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 (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 theta) (.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) (.f64 delta (cos.f64 phi1))) (.f64 (cos.f64 theta) (sin.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64))) delta)) delta (.f64 (cos.f64 phi1) (cos.f64 phi1)))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(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 (fma.f64 (.f64 (cos.f64 theta) delta) (cos.f64 phi1) (sin.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 (.f64 (sin.f64 phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) delta) (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1)))) delta (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 (fma.f64 (.f64 #s(literal -1/2 binary64) delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(.f64 (.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(.f64 (.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(.f64 (.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(.f64 (.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(* delta (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (.f64 (sin.f64 phi1) delta) (*.f64 (cos.f64 theta) (cos.f64 phi1)))
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (/ (pow (sin phi1) 2) delta)))
(.f64 (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (cos.f64 phi1) (/.f64 (sin.f64 phi1) delta))) delta)
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (/ (pow (sin phi1) 2) delta)))
(.f64 (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (cos.f64 phi1) (/.f64 (sin.f64 phi1) delta))) delta)
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (/ (pow (sin phi1) 2) delta)))
(.f64 (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (cos.f64 phi1) (/.f64 (sin.f64 phi1) delta))) delta)
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(.f64 (.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(.f64 (.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(.f64 (.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(.f64 (.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(* delta (* (cos phi1) (* (cos theta) (sin phi1))))
(.f64 (.f64 (sin.f64 phi1) delta) (*.f64 (cos.f64 theta) (cos.f64 phi1)))
(* -1 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* -1 (/ (pow (sin phi1) 2) delta)))))
(.f64 (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (cos.f64 phi1) (/.f64 (sin.f64 phi1) delta))) delta)
(* -1 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* -1 (/ (pow (sin phi1) 2) delta)))))
(.f64 (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (cos.f64 phi1) (/.f64 (sin.f64 phi1) delta))) delta)
(* -1 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* -1 (/ (pow (sin phi1) 2) delta)))))
(.f64 (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (cos.f64 phi1) (/.f64 (sin.f64 phi1) delta))) delta)
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))

rewrite274.0ms (1.8%)

Memory

-4.9MiB live, 238.1MiB allocated

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	65	665
0	110	622
1	398	604
2	2660	604
0	9274	604

Stop Event

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

Counts

28 → 987

Calls

Call 1

Inputs
(fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))
(.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)) (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
(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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))
(/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta))))
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(.f64 (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.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 (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))
(.f64 (sin.f64 phi1) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))
(.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.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))))))

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

eval507.0ms (3.3%)

Memory: 21.0MiB live, 555.5MiB allocated
Compiler: Compiled 106 357 to 5 467 computations (94.9% saved)

prune129.0ms (0.8%)

Memory

24.2MiB live, 261.0MiB allocated

Pruning

47 alts after pruning (46 fresh and 1 done)

	Pruned	Kept	Total
New	2 484	41	2 525
Fresh	15	5	20
Picked	4	1	5
Done	0	0	0
Total	2 503	47	2 550

Accuracy

100.0%

Counts

2 550 → 47

Alt Table

Click to see full alt table

Status	Accuracy	Program
	57.0%	(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (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))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (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))
	56.9%	(/.f64 #s(literal 1 binary64) (/.f64 (-.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 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (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))) #s(literal 2 binary64)))))
▶	99.8%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
	88.3%	(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 (pow.f64 (sin.f64 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))))
	99.8%	(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
	74.4%	(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (pow.f64 (pow.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #s(literal 1/2 binary64)) #s(literal 2 binary64))))
	91.6%	(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.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.2%	(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
	88.3%	(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.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))))
▶	88.3%	(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))))
	90.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)))) (pow.f64 (fma.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))) #s(literal -1 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)) (.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (sin.f64 phi1) (cos.f64 delta)))))
	74.4%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (pow.f64 (pow.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #s(literal 1/2 binary64)) #s(literal 2 binary64))))
✓	99.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
	91.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))))
	76.9%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) #s(approx (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))))
	99.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))
	94.2%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) #s(approx (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))))
	99.8%	(+.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 phi1 phi1)))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
▶	99.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
	88.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 #s(approx (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
	91.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
	94.2%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
▶	77.2%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
	82.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (.f64 phi1 (sin.f64 delta)) (cos.f64 theta))))))
	82.7%	(+.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)))))) #s(approx (* (sin phi1) (+ (* (* delta (cos theta)) (cos phi1)) (sin phi1))) (*.f64 (fma.f64 delta (cos.f64 phi1) (sin.f64 phi1)) (sin.f64 phi1)))))))
	78.7%	(+.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)))))) #s(approx (* (sin phi1) (+ (* (* delta (cos theta)) (cos phi1)) (sin phi1))) (.f64 (.f64 (cos.f64 theta) delta) phi1))))))
	77.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))))))
	76.9%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
	81.7%	(+.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))))))) (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) delta) delta (.f64 (cos.f64 phi1) (fma.f64 (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)) delta (cos.f64 phi1)))))))
	88.4%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	50.9%	(+.f64 lambda1 (atan2.f64 (.f64 (exp.f64 (.f64 (log.f64 (.f64 (sin.f64 theta) (sin.f64 delta))) #s(literal 1 binary64))) (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.7%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 (.f64 #s(literal -1/6 binary64) delta) delta) delta))) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
	74.3%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 (.f64 #s(literal -1/6 binary64) delta) delta) 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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
	76.3%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
	70.5%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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.0%	(+.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))))
	50.9%	(+.f64 lambda1 (atan2.f64 (exp.f64 (.f64 (log.f64 (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
	45.8%	(+.f64 lambda1 (atan2.f64 (exp.f64 (.f64 (log.f64 (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 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))))
	77.7%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.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))))
	70.5%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 delta (.f64 (.f64 #s(literal -1/6 binary64) delta) delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	74.5%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (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))))
	78.6%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
	86.3%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
▶	85.7%	(+.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))))
	99.8%	#s(approx (+ lambda1 (atan2 (/ (cos phi1) (/ 1 (* (sin theta) (sin delta)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (fma.f64 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1))
	35.9%	#s(approx (+ lambda1 (atan2 (/ (cos phi1) (/ 1 (* (sin theta) (sin delta)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))

Compiler

Compiled 2 536 to 1 895 computations (25.3% saved)

simplify149.0ms (1%)

Memory

12.6MiB live, 130.1MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score
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 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
cost-diff	0	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
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) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))
cost-diff	0	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
cost-diff	0	(atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))
cost-diff	0	(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))))
cost-diff	1792	(/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
cost-diff	5760	(/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
cost-diff	0	(*.f64 (sin.f64 theta) (sin.f64 delta))
cost-diff	0	#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
cost-diff	0	(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)))
cost-diff	0	(+.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))))
cost-diff	0	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
cost-diff	320	(*.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))
cost-diff	6464	(fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))
cost-diff	12800	(exp.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)))

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	71	815
0	115	807
1	185	755
2	341	755
3	723	755
4	1263	755
5	1829	755
6	2488	755
7	3768	755
8	4738	755
9	5527	755
10	6153	755
11	6681	755
0	8014	755

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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))
(cos.f64 delta)
(fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)))
(*.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))
(log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(sin.f64 phi1)
#s(literal 2 binary64)
#s(literal 1 binary64)
(.f64 (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(cos.f64 theta)
(*.f64 (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))) #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 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 theta) (sin.f64 delta)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
#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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))))
lambda1
(atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))
(/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
#s(literal 1 binary64)
(/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(pow.f64 (sin.f64 theta) #s(literal -1 binary64))
(sin.f64 theta)
theta
#s(literal -1 binary64)
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(cos.f64 phi1)
phi1
(sin.f64 delta)
delta
#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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) 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) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))
(cos.f64 delta)
#s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))
(.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)
(fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))
(cos.f64 theta)
(*.f64 (cos.f64 delta) phi1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (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 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))
(neg.f64 (sin.f64 phi1))
(sin.f64 phi1)
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(cos.f64 theta)
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(cos.f64 delta)
lambda1

Outputs
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (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) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))
(fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(cos.f64 delta)
(fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))
(.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(exp.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(*.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))
(log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(sin.f64 phi1)
#s(literal 2 binary64)
#s(literal 1 binary64)
(.f64 (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))
(.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(cos.f64 theta)
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (sin.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))))
(+.f64 (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)
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)))
(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 theta) (sin.f64 delta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (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
#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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))))
(+.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)
lambda1
(atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))
(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 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
#s(literal 1 binary64)
(/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(pow.f64 (sin.f64 theta) #s(literal -1 binary64))
(sin.f64 theta)
theta
#s(literal -1 binary64)
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(cos.f64 phi1)
phi1
(sin.f64 delta)
delta
#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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) lambda1)
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (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) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))
(cos.f64 delta)
#s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))
(.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)
(fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))
(cos.f64 theta)
(*.f64 (cos.f64 delta) phi1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (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
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))
(fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(neg.f64 (sin.f64 phi1))
(sin.f64 phi1)
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(cos.f64 theta)
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(cos.f64 delta)
lambda1

localize246.0ms (1.6%)

Memory

-26.2MiB live, 224.6MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.16015625	(*.f64 (cos.f64 delta) (sin.f64 phi1))
accuracy	0.20326630317403704	(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1)))
accuracy	0.234375	(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy	0.5197448316658354	(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))
accuracy	0.14453125	(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))
accuracy	0.234375	(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy	0.4747611668419882	(-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))
accuracy	31.194656169909646	#s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))
accuracy	0.14453125	(atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))
accuracy	0.29916000976844204	(/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
accuracy	0.5889545941286457	(/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
accuracy	26.490471811926735	#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
accuracy	0.14453125	(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)))
accuracy	0.234375	(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy	26.490471811926735	#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
accuracy	26.764793439166592	#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
accuracy	0.26400375976844204	(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
accuracy	0.4747611668419882	(-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))
accuracy	1.4651366498091742	(exp.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)))
accuracy	17.755832046889875	(log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))

Samples

179.0ms

256×

valid

Compiler

Compiled 746 to 61 computations (91.8% saved)

Precisions

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

ival-sin: 36.0ms (27.5% of total)

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

ival-cos: 15.0ms (11.5% of total)

ival-add: 12.0ms (9.2% of total)

ival-atan2: 9.0ms (6.9% of total)

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

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

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

ival-exp: 3.0ms (2.3% of total)

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

ival-log: 3.0ms (2.3% of total)

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

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

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

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

exact: 0.0ms (0% of total)

series160.0ms (1%)

Memory

2.9MiB live, 160.2MiB allocated

Counts

26 → 876

Calls

Call 1

Inputs
#s(alt (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (patch (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) #<representation binary64>) () ())
#s(alt (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())
#s(alt (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())
#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())
#s(alt (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))) (patch (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))) #<representation binary64>) () ())
#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.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 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())
#s(alt (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) (patch (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) #<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 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())
#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())
#s(alt (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())
#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<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 (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) (patch #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) #<representation binary64>) () ())
#s(alt (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) (patch (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) #<representation binary64>) () ())
#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())
#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<representation binary64>) () ())
#s(alt (.f64 (cos.f64 delta) (sin.f64 phi1)) (patch (.f64 (cos.f64 delta) (sin.f64 phi1)) #<representation binary64>) () ())

Outputs
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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 lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(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 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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(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 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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(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 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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#s(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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#s(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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#s(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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<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) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<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 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)))) (patch (+.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)))) #<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 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)))) (patch (+.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)))) #<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 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)))) (patch (+.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)))) #<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 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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<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) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<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) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<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 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)))) (patch (+.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)))) #<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 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)))) (patch (+.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)))) #<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 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)))) (patch (+.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)))) #<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 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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<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) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor 0 theta) (#s(alt (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1))))) (taylor 0 theta) (#s(alt (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (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 (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (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 (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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 #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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(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 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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(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 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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(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 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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#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 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))) (patch (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))) #<representation binary64>) () ())) ())
#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 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))) (patch (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))) #<representation binary64>) () ())) ())
#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 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))) (patch (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))) #<representation binary64>) () ())) ())
#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 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))) (patch (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))) #<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 theta) (sin.f64 delta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<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 theta) (sin.f64 delta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<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 theta) (sin.f64 delta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<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 theta) (sin.f64 delta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.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 (/ 1 (* theta (* (cos phi1) (sin delta)))) (taylor 0 theta) (#s(alt (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/6 (/ (pow theta 2) (* (cos phi1) (sin delta)))) (/ 1 (* (cos phi1) (sin delta)))) theta) (taylor 0 theta) (#s(alt (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow theta 2) (+ (* 7/360 (/ (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/6 (/ 1 (* (cos phi1) (sin delta)))))) (/ 1 (* (cos phi1) (sin delta)))) theta) (taylor 0 theta) (#s(alt (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow theta 2) (+ (* (pow theta 2) (+ (* 31/15120 (/ (pow theta 2) (* (cos phi1) (sin delta)))) (* 7/360 (/ 1 (* (cos phi1) (sin delta)))))) (* 1/6 (/ 1 (* (cos phi1) (sin delta)))))) (/ 1 (* (cos phi1) (sin delta)))) theta) (taylor 0 theta) (#s(alt (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* theta (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta)))) (taylor 0 theta) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #<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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #<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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#s(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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#s(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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#s(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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) (patch (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) #<representation binary64>) () ())) ())
#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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) (patch (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) #<representation binary64>) () ())) ())
#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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) (patch (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) #<representation binary64>) () ())) ())
#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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) (patch (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) #<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 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 theta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 theta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 theta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 theta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1))))) (taylor 0 theta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1))))) (taylor 0 theta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1))))) (taylor 0 theta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1))))) (taylor 0 theta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.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))))))) (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) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))) (taylor 0 theta) (#s(alt #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) (patch #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1))))) (taylor 0 theta) (#s(alt #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) (patch #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (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 #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) (patch #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (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 #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) (patch #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1))))) (taylor 0 theta) (#s(alt (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) (patch (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1))))) (taylor 0 theta) (#s(alt (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) (patch (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) 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))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1))))) (taylor 0 theta) (#s(alt (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) (patch (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) 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))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1))))) (taylor 0 theta) (#s(alt (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) (patch (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))) (taylor 0 theta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor 0 theta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (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 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (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/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 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<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 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<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 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<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 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf theta) (#s(alt (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf theta) (#s(alt (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf theta) (#s(alt (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf theta) (#s(alt (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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 #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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(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 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))) (patch (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))) #<representation binary64>) () ())) ())
#s(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 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))) (patch (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))) #<representation binary64>) () ())) ())
#s(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 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))) (patch (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))) #<representation binary64>) () ())) ())
#s(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 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))) (patch (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))) #<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 theta) (sin.f64 delta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<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 theta) (sin.f64 delta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<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 theta) (sin.f64 delta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<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 theta) (sin.f64 delta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.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 (/ 1 (* (cos phi1) (* (sin delta) (sin theta)))) (taylor inf theta) (#s(alt (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (cos phi1) (* (sin delta) (sin theta)))) (taylor inf theta) (#s(alt (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (cos phi1) (* (sin delta) (sin theta)))) (taylor inf theta) (#s(alt (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (cos phi1) (* (sin delta) (sin theta)))) (taylor inf theta) (#s(alt (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf theta) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#s(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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) (patch (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) #<representation binary64>) () ())) ())
#s(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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) (patch (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) #<representation binary64>) () ())) ())
#s(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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) (patch (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) #<representation binary64>) () ())) ())
#s(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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) (patch (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) 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 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor inf theta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor inf theta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor inf theta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor inf theta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf theta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf theta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf theta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf theta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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 #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) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf theta) (#s(alt #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) (patch #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf theta) (#s(alt #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) (patch #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf theta) (#s(alt #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) (patch #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf theta) (#s(alt #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) (patch #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf theta) (#s(alt (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) (patch (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf theta) (#s(alt (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) (patch (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf theta) (#s(alt (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) (patch (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf theta) (#s(alt (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) (patch (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf theta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf theta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf theta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf theta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf theta) (#s(alt (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf theta) (#s(alt (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf theta) (#s(alt (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf theta) (#s(alt (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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 #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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(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 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))) (patch (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))) #<representation binary64>) () ())) ())
#s(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 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))) (patch (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))) #<representation binary64>) () ())) ())
#s(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 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))) (patch (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))) #<representation binary64>) () ())) ())
#s(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 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))) (patch (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))) #<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 theta) (sin.f64 delta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<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 theta) (sin.f64 delta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<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 theta) (sin.f64 delta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<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 theta) (sin.f64 delta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.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 (/ 1 (* (cos phi1) (* (sin delta) (sin theta)))) (taylor -inf theta) (#s(alt (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (cos phi1) (* (sin delta) (sin theta)))) (taylor -inf theta) (#s(alt (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (cos phi1) (* (sin delta) (sin theta)))) (taylor -inf theta) (#s(alt (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (cos phi1) (* (sin delta) (sin theta)))) (taylor -inf theta) (#s(alt (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf theta) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#s(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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) (patch (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) #<representation binary64>) () ())) ())
#s(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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) (patch (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) #<representation binary64>) () ())) ())
#s(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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) (patch (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) #<representation binary64>) () ())) ())
#s(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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) (patch (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) 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 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor -inf theta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor -inf theta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor -inf theta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor -inf theta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf theta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf theta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf theta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf theta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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 #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) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf theta) (#s(alt #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) (patch #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf theta) (#s(alt #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) (patch #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf theta) (#s(alt #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) (patch #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf theta) (#s(alt #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) (patch #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf theta) (#s(alt (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) (patch (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf theta) (#s(alt (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) (patch (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf theta) (#s(alt (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) (patch (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf theta) (#s(alt (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) (patch (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf theta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf theta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf theta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf theta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (pow phi1 2) (taylor 0 phi1) (#s(alt (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (patch (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2)))) (taylor 0 phi1) (#s(alt (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (patch (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3)))) (taylor 0 phi1) (#s(alt (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (patch (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 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 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (patch (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))) (taylor 0 phi1) (#s(alt (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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 (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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 (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* 2 (log phi1)) (taylor 0 phi1) (#s(alt (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/3 (pow phi1 2)) (* 2 (log phi1))) (taylor 0 phi1) (#s(alt (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 (log phi1)) (* (pow phi1 2) (- (* -1/90 (pow phi1 2)) 1/3))) (taylor 0 phi1) (#s(alt (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 (log phi1)) (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/2835 (pow phi1 2)) 1/90)) 1/3))) (taylor 0 phi1) (#s(alt (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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 #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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(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 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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(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 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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(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 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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#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 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))) (patch (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))) #<representation binary64>) () ())) ())
#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 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))) (patch (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))) #<representation binary64>) () ())) ())
#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 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))) (patch (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))) #<representation binary64>) () ())) ())
#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 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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor 0 phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<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 theta) (sin.f64 delta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<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 theta) (sin.f64 delta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<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 theta) (sin.f64 delta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (sin delta) (sin theta))) (taylor 0 phi1) (#s(alt (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (pow phi1 2) (* (sin delta) (sin theta)))) (/ 1 (* (sin delta) (sin theta)))) (taylor 0 phi1) (#s(alt (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow phi1 2) (+ (* 5/24 (/ (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/2 (/ 1 (* (sin delta) (sin theta)))))) (/ 1 (* (sin delta) (sin theta)))) (taylor 0 phi1) (#s(alt (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow phi1 2) (+ (* (pow phi1 2) (+ (* 61/720 (/ (pow phi1 2) (* (sin delta) (sin theta)))) (* 5/24 (/ 1 (* (sin delta) (sin theta)))))) (* 1/2 (/ 1 (* (sin delta) (sin theta)))))) (/ 1 (* (sin delta) (sin theta)))) (taylor 0 phi1) (#s(alt (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor 0 phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta))) (taylor 0 phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #<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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #<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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#s(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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#s(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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#s(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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) (patch (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) #<representation binary64>) () ())) ())
#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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) (patch (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) #<representation binary64>) () ())) ())
#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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) (patch (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) #<representation binary64>) () ())) ())
#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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) (patch (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) 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 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* 2 (log phi1)) (taylor 0 phi1) (#s(alt (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/3 (pow phi1 2)) (* 2 (log phi1))) (taylor 0 phi1) (#s(alt (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 (log phi1)) (* (pow phi1 2) (- (* -1/90 (pow phi1 2)) 1/3))) (taylor 0 phi1) (#s(alt (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 (log phi1)) (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/2835 (pow phi1 2)) 1/90)) 1/3))) (taylor 0 phi1) (#s(alt (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (pow phi1 2) (taylor 0 phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2)))) (taylor 0 phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 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 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 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 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<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 (* phi1 (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) (patch #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) (patch #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) 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 #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) (patch #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) 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 #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) (patch #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) (patch (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) (patch (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) 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) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) (patch (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) 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) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) (patch (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (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 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (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 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (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 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (sin delta)) (taylor 0 phi1) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (cos delta) (* -1/2 (* phi1 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<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 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (cos delta)) (taylor 0 phi1) (#s(alt (.f64 (cos.f64 delta) (sin.f64 phi1)) (patch (.f64 (cos.f64 delta) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (cos delta) (* -1/6 (* (pow phi1 2) (cos delta))))) (taylor 0 phi1) (#s(alt (.f64 (cos.f64 delta) (sin.f64 phi1)) (patch (.f64 (cos.f64 delta) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (cos delta) (* (pow phi1 2) (+ (* -1/6 (cos delta)) (* 1/120 (* (pow phi1 2) (cos delta))))))) (taylor 0 phi1) (#s(alt (.f64 (cos.f64 delta) (sin.f64 phi1)) (patch (.f64 (cos.f64 delta) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (cos delta) (* (pow phi1 2) (+ (* -1/6 (cos delta)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (cos delta))) (* 1/120 (cos delta)))))))) (taylor 0 phi1) (#s(alt (.f64 (cos.f64 delta) (sin.f64 phi1)) (patch (.f64 (cos.f64 delta) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor inf phi1) (#s(alt (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (patch (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor inf phi1) (#s(alt (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (patch (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor inf phi1) (#s(alt (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (patch (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor inf phi1) (#s(alt (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (patch (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf phi1) (#s(alt (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf phi1) (#s(alt (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf phi1) (#s(alt (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf phi1) (#s(alt (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (log (pow (sin phi1) 2)) (taylor inf phi1) (#s(alt (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (log (pow (sin phi1) 2)) (taylor inf phi1) (#s(alt (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (log (pow (sin phi1) 2)) (taylor inf phi1) (#s(alt (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (log (pow (sin phi1) 2)) (taylor inf phi1) (#s(alt (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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 #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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(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 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))) (patch (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))) #<representation binary64>) () ())) ())
#s(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 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))) (patch (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))) #<representation binary64>) () ())) ())
#s(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 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))) (patch (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))) #<representation binary64>) () ())) ())
#s(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 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))) (patch (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))) #<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 theta) (sin.f64 delta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<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 theta) (sin.f64 delta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<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 theta) (sin.f64 delta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<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 theta) (sin.f64 delta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (cos phi1) (* (sin delta) (sin theta)))) (taylor inf phi1) (#s(alt (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (cos phi1) (* (sin delta) (sin theta)))) (taylor inf phi1) (#s(alt (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (cos phi1) (* (sin delta) (sin theta)))) (taylor inf phi1) (#s(alt (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (cos phi1) (* (sin delta) (sin theta)))) (taylor inf phi1) (#s(alt (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#s(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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) (patch (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) #<representation binary64>) () ())) ())
#s(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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) (patch (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) #<representation binary64>) () ())) ())
#s(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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) (patch (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) #<representation binary64>) () ())) ())
#s(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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) (patch (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) 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 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor inf phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor inf phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor inf phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor inf phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (log (pow (sin phi1) 2)) (taylor inf phi1) (#s(alt (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (log (pow (sin phi1) 2)) (taylor inf phi1) (#s(alt (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (log (pow (sin phi1) 2)) (taylor inf phi1) (#s(alt (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (log (pow (sin phi1) 2)) (taylor inf phi1) (#s(alt (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.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) (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) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf phi1) (#s(alt #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) (patch #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf phi1) (#s(alt #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) (patch #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf phi1) (#s(alt #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) (patch #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf phi1) (#s(alt #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) (patch #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) (patch (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) (patch (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) (patch (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) (patch (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf phi1) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf phi1) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf phi1) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf phi1) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor inf phi1) (#s(alt (.f64 (cos.f64 delta) (sin.f64 phi1)) (patch (.f64 (cos.f64 delta) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor inf phi1) (#s(alt (.f64 (cos.f64 delta) (sin.f64 phi1)) (patch (.f64 (cos.f64 delta) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor inf phi1) (#s(alt (.f64 (cos.f64 delta) (sin.f64 phi1)) (patch (.f64 (cos.f64 delta) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor inf phi1) (#s(alt (.f64 (cos.f64 delta) (sin.f64 phi1)) (patch (.f64 (cos.f64 delta) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor -inf phi1) (#s(alt (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (patch (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor -inf phi1) (#s(alt (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (patch (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor -inf phi1) (#s(alt (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (patch (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor -inf phi1) (#s(alt (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (patch (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (log (pow (sin phi1) 2)) (taylor -inf phi1) (#s(alt (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (log (pow (sin phi1) 2)) (taylor -inf phi1) (#s(alt (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (log (pow (sin phi1) 2)) (taylor -inf phi1) (#s(alt (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (log (pow (sin phi1) 2)) (taylor -inf phi1) (#s(alt (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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 #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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(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 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))) (patch (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))) #<representation binary64>) () ())) ())
#s(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 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))) (patch (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))) #<representation binary64>) () ())) ())
#s(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 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))) (patch (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))) #<representation binary64>) () ())) ())
#s(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 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))) (patch (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))) #<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 theta) (sin.f64 delta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<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 theta) (sin.f64 delta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<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 theta) (sin.f64 delta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<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 theta) (sin.f64 delta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (cos phi1) (* (sin delta) (sin theta)))) (taylor -inf phi1) (#s(alt (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (cos phi1) (* (sin delta) (sin theta)))) (taylor -inf phi1) (#s(alt (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (cos phi1) (* (sin delta) (sin theta)))) (taylor -inf phi1) (#s(alt (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (cos phi1) (* (sin delta) (sin theta)))) (taylor -inf phi1) (#s(alt (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#s(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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) (patch (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) #<representation binary64>) () ())) ())
#s(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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) (patch (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) #<representation binary64>) () ())) ())
#s(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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) (patch (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) #<representation binary64>) () ())) ())
#s(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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) (patch (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) 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 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor -inf phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor -inf phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor -inf phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor -inf phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (log (pow (sin phi1) 2)) (taylor -inf phi1) (#s(alt (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (log (pow (sin phi1) 2)) (taylor -inf phi1) (#s(alt (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (log (pow (sin phi1) 2)) (taylor -inf phi1) (#s(alt (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (log (pow (sin phi1) 2)) (taylor -inf phi1) (#s(alt (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor -inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor -inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor -inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor -inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.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) (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) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) (patch #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) (patch #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) (patch #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) (patch #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) (patch (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) (patch (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) (patch (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) (patch (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf phi1) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf phi1) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf phi1) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf phi1) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor -inf phi1) (#s(alt (.f64 (cos.f64 delta) (sin.f64 phi1)) (patch (.f64 (cos.f64 delta) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor -inf phi1) (#s(alt (.f64 (cos.f64 delta) (sin.f64 phi1)) (patch (.f64 (cos.f64 delta) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor -inf phi1) (#s(alt (.f64 (cos.f64 delta) (sin.f64 phi1)) (patch (.f64 (cos.f64 delta) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor -inf phi1) (#s(alt (.f64 (cos.f64 delta) (sin.f64 phi1)) (patch (.f64 (cos.f64 delta) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor 0 delta) (#s(alt (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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 (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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 (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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 #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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(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 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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(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 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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(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 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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#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 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))) (patch (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))) #<representation binary64>) () ())) ())
#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 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))) (patch (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))) #<representation binary64>) () ())) ())
#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 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))) (patch (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))) #<representation binary64>) () ())) ())
#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 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))) (patch (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))) #<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 theta) (sin.f64 delta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<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 theta) (sin.f64 delta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<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 theta) (sin.f64 delta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<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 theta) (sin.f64 delta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.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 (/ 1 (* delta (* (cos phi1) (sin theta)))) (taylor 0 delta) (#s(alt (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/6 (/ (pow delta 2) (* (cos phi1) (sin theta)))) (/ 1 (* (cos phi1) (sin theta)))) delta) (taylor 0 delta) (#s(alt (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow delta 2) (+ (* 7/360 (/ (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/6 (/ 1 (* (cos phi1) (sin theta)))))) (/ 1 (* (cos phi1) (sin theta)))) delta) (taylor 0 delta) (#s(alt (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow delta 2) (+ (* (pow delta 2) (+ (* 31/15120 (/ (pow delta 2) (* (cos phi1) (sin theta)))) (* 7/360 (/ 1 (* (cos phi1) (sin theta)))))) (* 1/6 (/ 1 (* (cos phi1) (sin theta)))))) (/ 1 (* (cos phi1) (sin theta)))) delta) (taylor 0 delta) (#s(alt (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* delta (* (cos phi1) (sin theta))) (taylor 0 delta) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta)))) (taylor 0 delta) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #<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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #<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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#s(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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#s(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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#s(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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) (patch (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) #<representation binary64>) () ())) ())
#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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) (patch (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) #<representation binary64>) () ())) ())
#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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) (patch (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) #<representation binary64>) () ())) ())
#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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) (patch (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) 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 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 delta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 delta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 delta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 delta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.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 (pow (sin phi1) 2) (taylor 0 delta) (#s(alt #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) (patch #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) (patch #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) 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 #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) (patch #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) 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 #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) (patch #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) (patch (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) 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) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) (patch (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) 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) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) (patch (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) 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) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) (patch (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (pow (sin phi1) 2))) (taylor 0 delta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (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 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (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 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (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 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (sin phi1) (taylor 0 delta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))) (taylor 0 delta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))))) (taylor 0 delta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<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 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (sin phi1) (taylor 0 delta) (#s(alt (.f64 (cos.f64 delta) (sin.f64 phi1)) (patch (.f64 (cos.f64 delta) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi1) (* -1/2 (* (pow delta 2) (sin phi1)))) (taylor 0 delta) (#s(alt (.f64 (cos.f64 delta) (sin.f64 phi1)) (patch (.f64 (cos.f64 delta) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi1) (* (pow delta 2) (+ (* -1/2 (sin phi1)) (* 1/24 (* (pow delta 2) (sin phi1)))))) (taylor 0 delta) (#s(alt (.f64 (cos.f64 delta) (sin.f64 phi1)) (patch (.f64 (cos.f64 delta) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi1) (* (pow delta 2) (+ (* -1/2 (sin phi1)) (* (pow delta 2) (+ (* -1/720 (* (pow delta 2) (sin phi1))) (* 1/24 (sin phi1))))))) (taylor 0 delta) (#s(alt (.f64 (cos.f64 delta) (sin.f64 phi1)) (patch (.f64 (cos.f64 delta) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf delta) (#s(alt (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf delta) (#s(alt (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf delta) (#s(alt (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf delta) (#s(alt (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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 #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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(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 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))) (patch (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))) #<representation binary64>) () ())) ())
#s(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 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))) (patch (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))) #<representation binary64>) () ())) ())
#s(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 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))) (patch (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))) #<representation binary64>) () ())) ())
#s(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 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))) (patch (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))) #<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 theta) (sin.f64 delta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<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 theta) (sin.f64 delta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<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 theta) (sin.f64 delta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<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 theta) (sin.f64 delta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.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 (/ 1 (* (cos phi1) (* (sin delta) (sin theta)))) (taylor inf delta) (#s(alt (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (cos phi1) (* (sin delta) (sin theta)))) (taylor inf delta) (#s(alt (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (cos phi1) (* (sin delta) (sin theta)))) (taylor inf delta) (#s(alt (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (cos phi1) (* (sin delta) (sin theta)))) (taylor inf delta) (#s(alt (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor inf delta) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#s(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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) (patch (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) #<representation binary64>) () ())) ())
#s(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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) (patch (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) #<representation binary64>) () ())) ())
#s(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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) (patch (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) #<representation binary64>) () ())) ())
#s(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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) (patch (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) 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 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor inf delta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor inf delta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor inf delta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor inf delta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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 #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) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf delta) (#s(alt #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) (patch #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf delta) (#s(alt #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) (patch #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf delta) (#s(alt #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) (patch #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor inf delta) (#s(alt #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) (patch #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) (patch (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) (patch (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) (patch (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) (patch (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf delta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf delta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf delta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf delta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor inf delta) (#s(alt (.f64 (cos.f64 delta) (sin.f64 phi1)) (patch (.f64 (cos.f64 delta) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor inf delta) (#s(alt (.f64 (cos.f64 delta) (sin.f64 phi1)) (patch (.f64 (cos.f64 delta) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor inf delta) (#s(alt (.f64 (cos.f64 delta) (sin.f64 phi1)) (patch (.f64 (cos.f64 delta) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor inf delta) (#s(alt (.f64 (cos.f64 delta) (sin.f64 phi1)) (patch (.f64 (cos.f64 delta) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf delta) (#s(alt (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf delta) (#s(alt (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf delta) (#s(alt (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf delta) (#s(alt (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (patch (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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 #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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(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 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))) (patch (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))) #<representation binary64>) () ())) ())
#s(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 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))) (patch (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))) #<representation binary64>) () ())) ())
#s(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 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))) (patch (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))) #<representation binary64>) () ())) ())
#s(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 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))) (patch (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))) #<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 theta) (sin.f64 delta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<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 theta) (sin.f64 delta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<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 theta) (sin.f64 delta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #<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 theta) (sin.f64 delta))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (*.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 (/ 1 (* (cos phi1) (* (sin delta) (sin theta)))) (taylor -inf delta) (#s(alt (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (cos phi1) (* (sin delta) (sin theta)))) (taylor -inf delta) (#s(alt (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (cos phi1) (* (sin delta) (sin theta)))) (taylor -inf delta) (#s(alt (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (cos phi1) (* (sin delta) (sin theta)))) (taylor -inf delta) (#s(alt (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (patch (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (sin delta) (sin theta))) (taylor -inf delta) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) (patch (+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))) #<representation binary64>) () ())) ())
#s(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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) (patch (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) #<representation binary64>) () ())) ())
#s(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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) (patch (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) #<representation binary64>) () ())) ())
#s(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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) (patch (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) #<representation binary64>) () ())) ())
#s(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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) (patch (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) 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 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor -inf delta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor -inf delta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor -inf delta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor -inf delta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (patch (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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 #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) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf delta) (#s(alt #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) (patch #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf delta) (#s(alt #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) (patch #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf delta) (#s(alt #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) (patch #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))) (taylor -inf delta) (#s(alt #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) (patch #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) (patch (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) (patch (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) (patch (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) (patch (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf delta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf delta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf delta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf delta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor -inf delta) (#s(alt (.f64 (cos.f64 delta) (sin.f64 phi1)) (patch (.f64 (cos.f64 delta) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor -inf delta) (#s(alt (.f64 (cos.f64 delta) (sin.f64 phi1)) (patch (.f64 (cos.f64 delta) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor -inf delta) (#s(alt (.f64 (cos.f64 delta) (sin.f64 phi1)) (patch (.f64 (cos.f64 delta) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor -inf delta) (#s(alt (.f64 (cos.f64 delta) (sin.f64 phi1)) (patch (.f64 (cos.f64 delta) (sin.f64 phi1)) #<representation binary64>) () ())) ())

Calls

12 calls:

Time	Variable		Point	Expression
39.0ms	phi1	@	inf	((exp (* (log (pow (sin phi1) 2)) 1)) (+ (* (exp (* (log (pow (sin phi1) 2)) 1)) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (* (log (pow (sin phi1) 2)) 1) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (exp (* (log (pow (sin phi1) 2)) 1)) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))))) (+ 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 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (+ lambda1 (atan2 (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))))) (* (* (sin theta) (sin delta)) (cos phi1)) (+ (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta))) lambda1) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta))) (log (pow (sin phi1) 2)) (- (cos delta) (+ (* (exp (* (log (pow (sin phi1) 2)) 1)) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))) (pow (sin phi1) 2) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (* (cos delta) (sin phi1)))
19.0ms	phi1	@	-inf	((exp (* (log (pow (sin phi1) 2)) 1)) (+ (* (exp (* (log (pow (sin phi1) 2)) 1)) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (* (log (pow (sin phi1) 2)) 1) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (exp (* (log (pow (sin phi1) 2)) 1)) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))))) (+ 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 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (+ lambda1 (atan2 (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))))) (* (* (sin theta) (sin delta)) (cos phi1)) (+ (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta))) lambda1) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta))) (log (pow (sin phi1) 2)) (- (cos delta) (+ (* (exp (* (log (pow (sin phi1) 2)) 1)) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))) (pow (sin phi1) 2) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (* (cos delta) (sin phi1)))
5.0ms	phi1	@	0	((exp (* (log (pow (sin phi1) 2)) 1)) (+ (* (exp (* (log (pow (sin phi1) 2)) 1)) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (* (log (pow (sin phi1) 2)) 1) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (exp (* (log (pow (sin phi1) 2)) 1)) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))))) (+ 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 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (+ lambda1 (atan2 (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))))) (* (* (sin theta) (sin delta)) (cos phi1)) (+ (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta))) lambda1) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta))) (log (pow (sin phi1) 2)) (- (cos delta) (+ (* (exp (* (log (pow (sin phi1) 2)) 1)) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))) (pow (sin phi1) 2) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (* (cos delta) (sin phi1)))
4.0ms	theta	@	inf	((exp (* (log (pow (sin phi1) 2)) 1)) (+ (* (exp (* (log (pow (sin phi1) 2)) 1)) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (* (log (pow (sin phi1) 2)) 1) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (exp (* (log (pow (sin phi1) 2)) 1)) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))))) (+ 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 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (+ lambda1 (atan2 (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))))) (* (* (sin theta) (sin delta)) (cos phi1)) (+ (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta))) lambda1) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta))) (log (pow (sin phi1) 2)) (- (cos delta) (+ (* (exp (* (log (pow (sin phi1) 2)) 1)) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))) (pow (sin phi1) 2) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (* (cos delta) (sin phi1)))
4.0ms	delta	@	inf	((exp (* (log (pow (sin phi1) 2)) 1)) (+ (* (exp (* (log (pow (sin phi1) 2)) 1)) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (* (log (pow (sin phi1) 2)) 1) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (exp (* (log (pow (sin phi1) 2)) 1)) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))))) (+ 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 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (+ lambda1 (atan2 (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))))) (* (* (sin theta) (sin delta)) (cos phi1)) (+ (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta))) lambda1) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta))) (log (pow (sin phi1) 2)) (- (cos delta) (+ (* (exp (* (log (pow (sin phi1) 2)) 1)) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))) (pow (sin phi1) 2) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (* (cos delta) (sin phi1)))

simplify240.0ms (1.5%)

Memory

25.8MiB live, 212.4MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	485	20478
1	1642	19066
2	5621	18845
0	8218	18019

Stop Event

1×	iter limit
1×	node limit

Counts

876 → 866

Calls

Call 1

Inputs
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin 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)))
(* 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
(* 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
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
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
(* -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
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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) (* -1 (* (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) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)) 1)))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1))))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (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))))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* 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)))))))))
(* 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))))))))
(/ 1 (* theta (* (cos phi1) (sin delta))))
(/ (+ (* 1/6 (/ (pow theta 2) (* (cos phi1) (sin delta)))) (/ 1 (* (cos phi1) (sin delta)))) theta)
(/ (+ (* (pow theta 2) (+ (* 7/360 (/ (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/6 (/ 1 (* (cos phi1) (sin delta)))))) (/ 1 (* (cos phi1) (sin delta)))) theta)
(/ (+ (* (pow theta 2) (+ (* (pow theta 2) (+ (* 31/15120 (/ (pow theta 2) (* (cos phi1) (sin delta)))) (* 7/360 (/ 1 (* (cos phi1) (sin delta)))))) (* 1/6 (/ 1 (* (cos phi1) (sin delta)))))) (/ 1 (* (cos phi1) (sin delta)))) theta)
(* 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)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin 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))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin 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))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (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) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1))))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (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))))))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin 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))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin 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))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (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 (* (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/24 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))))
(+ (* (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) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (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))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/ 1 (* (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)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (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) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (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) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (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))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/ 1 (* (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)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (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) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (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))))
(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))))
(* 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))))
(* 2 (log phi1))
(+ (* -1/3 (pow phi1 2)) (* 2 (log phi1)))
(+ (* 2 (log phi1)) (* (pow phi1 2) (- (* -1/90 (pow phi1 2)) 1/3)))
(+ (* 2 (log phi1)) (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/2835 (pow phi1 2)) 1/90)) 1/3)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (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))))))))
(/ 1 (* (sin delta) (sin theta)))
(+ (* 1/2 (/ (pow phi1 2) (* (sin delta) (sin theta)))) (/ 1 (* (sin delta) (sin theta))))
(+ (* (pow phi1 2) (+ (* 5/24 (/ (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/2 (/ 1 (* (sin delta) (sin theta)))))) (/ 1 (* (sin delta) (sin theta))))
(+ (* (pow phi1 2) (+ (* (pow phi1 2) (+ (* 61/720 (/ (pow phi1 2) (* (sin delta) (sin theta)))) (* 5/24 (/ 1 (* (sin delta) (sin theta)))))) (* 1/2 (/ 1 (* (sin delta) (sin theta)))))) (/ 1 (* (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))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(* (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))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(* 2 (log phi1))
(+ (* -1/3 (pow phi1 2)) (* 2 (log phi1)))
(+ (* 2 (log phi1)) (* (pow phi1 2) (- (* -1/90 (pow phi1 2)) 1/3)))
(+ (* 2 (log phi1)) (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/2835 (pow phi1 2)) 1/90)) 1/3)))
(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)))))
(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))))
(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)))))
(* 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))))
(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)
(+ (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 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)))
(* phi1 (cos delta))
(* phi1 (+ (cos delta) (* -1/6 (* (pow phi1 2) (cos delta)))))
(* phi1 (+ (cos delta) (* (pow phi1 2) (+ (* -1/6 (cos delta)) (* 1/120 (* (pow phi1 2) (cos delta)))))))
(* phi1 (+ (cos delta) (* (pow phi1 2) (+ (* -1/6 (cos delta)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (cos delta))) (* 1/120 (cos delta))))))))
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(log (pow (sin phi1) 2))
(log (pow (sin phi1) 2))
(log (pow (sin phi1) 2))
(log (pow (sin phi1) 2))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (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 (* (cos phi1) (* (sin delta) (sin theta))))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/ 1 (* (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)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(log (pow (sin phi1) 2))
(log (pow (sin phi1) 2))
(log (pow (sin phi1) 2))
(log (pow (sin phi1) 2))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(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) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (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 delta) (sin phi1))
(* (cos delta) (sin phi1))
(* (cos delta) (sin phi1))
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(log (pow (sin phi1) 2))
(log (pow (sin phi1) 2))
(log (pow (sin phi1) 2))
(log (pow (sin phi1) 2))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (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 (* (cos phi1) (* (sin delta) (sin theta))))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/ 1 (* (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)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(log (pow (sin phi1) 2))
(log (pow (sin phi1) 2))
(log (pow (sin phi1) 2))
(log (pow (sin phi1) 2))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(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) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (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 delta) (sin phi1))
(* (cos delta) (sin phi1))
(* (cos delta) (sin phi1))
(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))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* 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)))))))))
(* 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))))))))
(/ 1 (* delta (* (cos phi1) (sin theta))))
(/ (+ (* 1/6 (/ (pow delta 2) (* (cos phi1) (sin theta)))) (/ 1 (* (cos phi1) (sin theta)))) delta)
(/ (+ (* (pow delta 2) (+ (* 7/360 (/ (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/6 (/ 1 (* (cos phi1) (sin theta)))))) (/ 1 (* (cos phi1) (sin theta)))) delta)
(/ (+ (* (pow delta 2) (+ (* (pow delta 2) (+ (* 31/15120 (/ (pow delta 2) (* (cos phi1) (sin theta)))) (* 7/360 (/ 1 (* (cos phi1) (sin theta)))))) (* 1/6 (/ 1 (* (cos phi1) (sin theta)))))) (/ 1 (* (cos phi1) (sin theta)))) delta)
(* 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)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(* 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)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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))
(- 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))
(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))
(- 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))
(+ 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))))))
(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)))))
(sin phi1)
(+ (sin phi1) (* -1/2 (* (pow delta 2) (sin phi1))))
(+ (sin phi1) (* (pow delta 2) (+ (* -1/2 (sin phi1)) (* 1/24 (* (pow delta 2) (sin phi1))))))
(+ (sin phi1) (* (pow delta 2) (+ (* -1/2 (sin phi1)) (* (pow delta 2) (+ (* -1/720 (* (pow delta 2) (sin phi1))) (* 1/24 (sin phi1)))))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (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))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/ 1 (* (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)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (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) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (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 delta) (sin phi1))
(* (cos delta) (sin phi1))
(* (cos delta) (sin phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (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))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/ 1 (* (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)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (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) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (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 delta) (sin phi1))
(* (cos delta) (sin phi1))
(* (cos delta) (sin phi1))

Outputs
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 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 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) 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 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) 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 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 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 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) 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 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) 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 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) 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 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (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 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (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 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) 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 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (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 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (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 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)) 1)))
(.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)) 1)))
(.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)) 1)))
(.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1))))
(.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (fma.f64 (.f64 theta theta) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1) (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (.f64 theta theta) #s(literal -1/2 binary64))) (*.f64 theta theta)))
(+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (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 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (fma.f64 (.f64 theta theta) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (pow.f64 theta #s(literal 4 binary64)) (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (.f64 theta theta) #s(literal 1/24 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* theta (* (cos phi1) (sin delta)))
(.f64 (.f64 theta (cos.f64 phi1)) (sin.f64 delta))
(* 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))))))))
(fma.f64 (pow.f64 theta #s(literal 3 binary64)) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal 1/120 binary64) (.f64 theta theta) #s(literal -1/6 binary64))) (.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 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)))))))))
(.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (pow.f64 theta #s(literal 4 binary64)) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 binary64))))) theta)
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(* 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)))))))
(fma.f64 (pow.f64 theta #s(literal 3 binary64)) (.f64 (sin.f64 delta) (fma.f64 #s(literal 1/120 binary64) (.f64 theta theta) #s(literal -1/6 binary64))) (*.f64 theta (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 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta) (.f64 (pow.f64 theta #s(literal 4 binary64)) (.f64 (sin.f64 delta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 binary64))))) theta)
(/ 1 (* theta (* (cos phi1) (sin delta))))
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 theta (cos.f64 phi1))) (sin.f64 delta))
(/ (+ (* 1/6 (/ (pow theta 2) (* (cos phi1) (sin delta)))) (/ 1 (* (cos phi1) (sin delta)))) theta)
(/.f64 (fma.f64 (/.f64 #s(literal 1/6 binary64) (sin.f64 delta)) (*.f64 theta (/.f64 theta (cos.f64 phi1))) (/.f64 (/.f64 #s(literal 1 binary64) (sin.f64 delta)) (cos.f64 phi1))) theta)
(/ (+ (* (pow theta 2) (+ (* 7/360 (/ (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/6 (/ 1 (* (cos phi1) (sin delta)))))) (/ 1 (* (cos phi1) (sin delta)))) theta)
(/.f64 (fma.f64 (.f64 (/.f64 theta (sin.f64 delta)) (/.f64 theta (cos.f64 phi1))) (fma.f64 (.f64 #s(literal 7/360 binary64) theta) theta #s(literal 1/6 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (sin.f64 delta)) (cos.f64 phi1))) theta)
(/ (+ (* (pow theta 2) (+ (* (pow theta 2) (+ (* 31/15120 (/ (pow theta 2) (* (cos phi1) (sin delta)))) (* 7/360 (/ 1 (* (cos phi1) (sin delta)))))) (* 1/6 (/ 1 (* (cos phi1) (sin delta)))))) (/ 1 (* (cos phi1) (sin delta)))) theta)
(/.f64 (fma.f64 (fma.f64 (.f64 (/.f64 theta (sin.f64 delta)) (/.f64 theta (cos.f64 phi1))) (fma.f64 (.f64 #s(literal 31/15120 binary64) theta) theta #s(literal 7/360 binary64)) (/.f64 (/.f64 #s(literal 1/6 binary64) (sin.f64 delta)) (cos.f64 phi1))) (*.f64 theta theta) (/.f64 (/.f64 #s(literal 1 binary64) (sin.f64 delta)) (cos.f64 phi1))) theta)
(* theta (* (cos phi1) (sin delta)))
(.f64 (.f64 theta (cos.f64 phi1)) (sin.f64 delta))
(* 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))))))))
(fma.f64 (pow.f64 theta #s(literal 3 binary64)) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal 1/120 binary64) (.f64 theta theta) #s(literal -1/6 binary64))) (.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 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)))))))))
(.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (pow.f64 theta #s(literal 4 binary64)) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 binary64))))) theta)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* theta (* (cos phi1) (sin delta)))
(.f64 (.f64 theta (cos.f64 phi1)) (sin.f64 delta))
(* 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))))))))
(fma.f64 (pow.f64 theta #s(literal 3 binary64)) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal 1/120 binary64) (.f64 theta theta) #s(literal -1/6 binary64))) (.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 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)))))))))
(.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (pow.f64 theta #s(literal 4 binary64)) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 binary64))))) theta)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (fma.f64 (.f64 theta theta) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 phi1)) (.f64 (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))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal -1/24 binary64) (.f64 theta theta) #s(literal 1/2 binary64))) (.f64 theta theta) (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))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(+.f64 (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (fma.f64 (.f64 theta theta) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (.f64 (pow.f64 theta #s(literal 4 binary64)) (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (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) (sin delta)))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.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)))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (fma.f64 (.f64 theta theta) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 phi1)) (.f64 (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)))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal -1/24 binary64) (.f64 theta theta) #s(literal 1/2 binary64))) (.f64 theta theta) (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)))))
(+.f64 (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (fma.f64 (.f64 theta theta) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (.f64 (pow.f64 theta #s(literal 4 binary64)) (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/720 binary64) (*.f64 theta theta) #s(literal -1/24 binary64)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1))))
(.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (fma.f64 (.f64 theta theta) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1) (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (.f64 theta theta) #s(literal -1/2 binary64))) (*.f64 theta theta)))
(+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (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 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (fma.f64 (.f64 theta theta) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (pow.f64 theta #s(literal 4 binary64)) (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (.f64 theta theta) #s(literal 1/24 binary64)))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (fma.f64 (.f64 theta theta) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 phi1)) (.f64 (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))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal -1/24 binary64) (.f64 theta theta) #s(literal 1/2 binary64))) (.f64 theta theta) (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))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(+.f64 (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (fma.f64 (.f64 theta theta) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (.f64 (pow.f64 theta #s(literal 4 binary64)) (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/720 binary64) (*.f64 theta theta) #s(literal -1/24 binary64)))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (fma.f64 (.f64 theta theta) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal -1/24 binary64) (.f64 theta theta) #s(literal 1/2 binary64))) (.f64 theta theta) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (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/24 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))))
(+.f64 (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (fma.f64 (.f64 theta theta) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (.f64 (pow.f64 theta #s(literal 4 binary64)) (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/720 binary64) (*.f64 theta theta) #s(literal -1/24 binary64)))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(fma.f64 (sin.f64 delta) (fma.f64 (.f64 theta theta) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 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))))))))
(fma.f64 (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (.f64 theta theta) #s(literal -1/2 binary64))) (.f64 theta theta) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.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 phi1) (cos.f64 delta) (fma.f64 (sin.f64 delta) (+.f64 (cos.f64 phi1) (.f64 (.f64 theta theta) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 theta #s(literal 4 binary64)) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 theta theta) #s(literal 1/24 binary64))))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(pow phi1 2)
(*.f64 phi1 phi1)
(* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))
(fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal -1/3 binary64) (*.f64 phi1 phi1))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))
(fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) (fma.f64 #s(literal 2/45 binary64) (.f64 phi1 phi1) #s(literal -1/3 binary64)) (.f64 phi1 phi1))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))
(fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) (fma.f64 (fma.f64 #s(literal -1/315 binary64) (.f64 phi1 phi1) #s(literal 2/45 binary64)) (.f64 phi1 phi1) #s(literal -1/3 binary64)) (*.f64 phi1 phi1))
(* phi1 (* (cos theta) (sin delta)))
(.f64 (.f64 phi1 (sin.f64 delta)) (cos.f64 theta))
(* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))
(.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))
(.f64 (fma.f64 (fma.f64 (.f64 (sin.f64 delta) phi1) (.f64 (cos.f64 theta) #s(literal -2/3 binary64)) (cos.f64 delta)) phi1 (.f64 (cos.f64 theta) (sin.f64 delta))) phi1)
(* 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 (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/3 binary64) (cos.f64 delta)) phi1 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) #s(literal -2/3 binary64)))) phi1 (cos.f64 delta)) phi1 (*.f64 (cos.f64 theta) (sin.f64 delta))) phi1)
(* 2 (log phi1))
(*.f64 (log.f64 phi1) #s(literal 2 binary64))
(+ (* -1/3 (pow phi1 2)) (* 2 (log phi1)))
(fma.f64 (log.f64 phi1) #s(literal 2 binary64) (.f64 #s(literal -1/3 binary64) (.f64 phi1 phi1)))
(+ (* 2 (log phi1)) (* (pow phi1 2) (- (* -1/90 (pow phi1 2)) 1/3)))
(fma.f64 (.f64 (fma.f64 #s(literal -1/90 binary64) (.f64 phi1 phi1) #s(literal -1/3 binary64)) phi1) phi1 (*.f64 (log.f64 phi1) #s(literal 2 binary64)))
(+ (* 2 (log phi1)) (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/2835 (pow phi1 2)) 1/90)) 1/3)))
(fma.f64 (.f64 (fma.f64 (fma.f64 #s(literal -2/2835 binary64) (.f64 phi1 phi1) #s(literal -1/90 binary64)) (.f64 phi1 phi1) #s(literal -1/3 binary64)) phi1) phi1 (.f64 (log.f64 phi1) #s(literal 2 binary64)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(+ (* (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (.f64 phi1 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(+ (* (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 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 theta) (sin.f64 delta)) (.f64 (pow.f64 phi1 #s(literal 4 binary64)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 (.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
(/ 1 (* (sin delta) (sin theta)))
(/.f64 (/.f64 #s(literal 1 binary64) (sin.f64 theta)) (sin.f64 delta))
(+ (* 1/2 (/ (pow phi1 2) (* (sin delta) (sin theta)))) (/ 1 (* (sin delta) (sin theta))))
(fma.f64 (/.f64 #s(literal 1/2 binary64) (sin.f64 theta)) (*.f64 phi1 (/.f64 phi1 (sin.f64 delta))) (/.f64 (/.f64 #s(literal 1 binary64) (sin.f64 theta)) (sin.f64 delta)))
(+ (* (pow phi1 2) (+ (* 5/24 (/ (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/2 (/ 1 (* (sin delta) (sin theta)))))) (/ 1 (* (sin delta) (sin theta))))
(fma.f64 (.f64 (/.f64 phi1 (sin.f64 theta)) (/.f64 phi1 (sin.f64 delta))) (fma.f64 (.f64 #s(literal 5/24 binary64) phi1) phi1 #s(literal 1/2 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (sin.f64 theta)) (sin.f64 delta)))
(+ (* (pow phi1 2) (+ (* (pow phi1 2) (+ (* 61/720 (/ (pow phi1 2) (* (sin delta) (sin theta)))) (* 5/24 (/ 1 (* (sin delta) (sin theta)))))) (* 1/2 (/ 1 (* (sin delta) (sin theta)))))) (/ 1 (* (sin delta) (sin theta))))
(fma.f64 (fma.f64 (.f64 (/.f64 phi1 (sin.f64 theta)) (/.f64 phi1 (sin.f64 delta))) (fma.f64 (.f64 #s(literal 61/720 binary64) phi1) phi1 #s(literal 5/24 binary64)) (/.f64 (/.f64 #s(literal 1/2 binary64) (sin.f64 theta)) (sin.f64 delta))) (*.f64 phi1 phi1) (/.f64 (/.f64 #s(literal 1 binary64) (sin.f64 theta)) (sin.f64 delta)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(+ (* (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (.f64 phi1 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(+ (* (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 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 theta) (sin.f64 delta)) (.f64 (pow.f64 phi1 #s(literal 4 binary64)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 (.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(+ (* (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (.f64 phi1 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(+ (* (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 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 theta) (sin.f64 delta)) (.f64 (pow.f64 phi1 #s(literal 4 binary64)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 (.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* 2 (log phi1))
(*.f64 (log.f64 phi1) #s(literal 2 binary64))
(+ (* -1/3 (pow phi1 2)) (* 2 (log phi1)))
(fma.f64 (log.f64 phi1) #s(literal 2 binary64) (.f64 #s(literal -1/3 binary64) (.f64 phi1 phi1)))
(+ (* 2 (log phi1)) (* (pow phi1 2) (- (* -1/90 (pow phi1 2)) 1/3)))
(fma.f64 (.f64 (fma.f64 #s(literal -1/90 binary64) (.f64 phi1 phi1) #s(literal -1/3 binary64)) phi1) phi1 (*.f64 (log.f64 phi1) #s(literal 2 binary64)))
(+ (* 2 (log phi1)) (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/2835 (pow phi1 2)) 1/90)) 1/3)))
(fma.f64 (.f64 (fma.f64 (fma.f64 #s(literal -2/2835 binary64) (.f64 phi1 phi1) #s(literal -1/90 binary64)) (.f64 phi1 phi1) #s(literal -1/3 binary64)) phi1) phi1 (.f64 (log.f64 phi1) #s(literal 2 binary64)))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) 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 (neg.f64 (fma.f64 (fma.f64 (.f64 (sin.f64 delta) phi1) (.f64 (cos.f64 theta) #s(literal -2/3 binary64)) (cos.f64 delta)) phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))) phi1 (cos.f64 delta))
(pow phi1 2)
(*.f64 phi1 phi1)
(* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))
(fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal -1/3 binary64) (*.f64 phi1 phi1))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))
(fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) (fma.f64 #s(literal 2/45 binary64) (.f64 phi1 phi1) #s(literal -1/3 binary64)) (.f64 phi1 phi1))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))
(fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) (fma.f64 (fma.f64 #s(literal -1/315 binary64) (.f64 phi1 phi1) #s(literal 2/45 binary64)) (.f64 phi1 phi1) #s(literal -1/3 binary64)) (*.f64 phi1 phi1))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) 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 (neg.f64 (fma.f64 (fma.f64 (.f64 (sin.f64 delta) phi1) (.f64 (cos.f64 theta) #s(literal -2/3 binary64)) (cos.f64 delta)) phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))) phi1 (cos.f64 delta))
(* phi1 (* (cos theta) (sin delta)))
(.f64 (.f64 phi1 (sin.f64 delta)) (cos.f64 theta))
(* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))
(.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))
(.f64 (fma.f64 (fma.f64 (.f64 (sin.f64 delta) phi1) (.f64 (cos.f64 theta) #s(literal -2/3 binary64)) (cos.f64 delta)) phi1 (.f64 (cos.f64 theta) (sin.f64 delta))) phi1)
(* 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 (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/3 binary64) (cos.f64 delta)) phi1 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) #s(literal -2/3 binary64)))) phi1 (cos.f64 delta)) phi1 (*.f64 (cos.f64 theta) (sin.f64 delta))) phi1)
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) 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 (neg.f64 (fma.f64 (fma.f64 (.f64 (sin.f64 delta) phi1) (.f64 (cos.f64 theta) #s(literal -2/3 binary64)) (cos.f64 delta)) phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))) phi1 (cos.f64 delta))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 delta))
(+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))
(fma.f64 (neg.f64 phi1) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1)) (cos.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 (neg.f64 (fma.f64 (fma.f64 (.f64 (sin.f64 delta) phi1) (.f64 (cos.f64 theta) #s(literal -2/3 binary64)) (cos.f64 delta)) phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))) phi1 (cos.f64 delta))
(* (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 (cos.f64 delta) phi1))
(+ (* phi1 (+ (cos delta) (* -1/2 (* phi1 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta)))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 theta) phi1)) (sin.f64 delta) (cos.f64 delta)) phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))
(+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* phi1 (cos delta))))))) (* (cos theta) (sin delta)))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) (cos.f64 delta) (.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 delta)) (cos.f64 theta))) phi1 (cos.f64 delta)) phi1 (.f64 (cos.f64 theta) (sin.f64 delta)))
(* phi1 (cos delta))
(*.f64 (cos.f64 delta) phi1)
(* phi1 (+ (cos delta) (* -1/6 (* (pow phi1 2) (cos delta)))))
(.f64 (cos.f64 delta) (fma.f64 phi1 (.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1) phi1))
(* phi1 (+ (cos delta) (* (pow phi1 2) (+ (* -1/6 (cos delta)) (* 1/120 (* (pow phi1 2) (cos delta)))))))
(fma.f64 (pow.f64 phi1 #s(literal 3 binary64)) (.f64 (cos.f64 delta) (fma.f64 (.f64 phi1 phi1) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (cos.f64 delta) phi1))
(* phi1 (+ (cos delta) (* (pow phi1 2) (+ (* -1/6 (cos delta)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (cos delta))) (* 1/120 (cos delta))))))))
(.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (.f64 (pow.f64 phi1 #s(literal 4 binary64)) (.f64 (cos.f64 delta) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))))) phi1)
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(log (pow (sin phi1) 2))
(log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(log (pow (sin phi1) 2))
(log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(log (pow (sin phi1) 2))
(log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(log (pow (sin phi1) 2))
(log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(log (pow (sin phi1) 2))
(log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(log (pow (sin phi1) 2))
(log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(log (pow (sin phi1) 2))
(log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(log (pow (sin phi1) 2))
(log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(* (cos delta) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(* (cos delta) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(* (cos delta) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(* (cos delta) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(log (pow (sin phi1) 2))
(log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(log (pow (sin phi1) 2))
(log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(log (pow (sin phi1) 2))
(log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(log (pow (sin phi1) 2))
(log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(log (pow (sin phi1) 2))
(log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(log (pow (sin phi1) 2))
(log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(log (pow (sin phi1) 2))
(log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(log (pow (sin phi1) 2))
(log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(* (cos delta) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(* (cos delta) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(* (cos delta) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(* (cos delta) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(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 (.f64 delta (cos.f64 theta)) (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 (.f64 (sin.f64 phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) delta) (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1)))) delta (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 (.f64 delta delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 #s(literal -1/6 binary64) (.f64 delta (cos.f64 phi1))) (cos.f64 theta) (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)))) (.f64 (sin.f64 phi1) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* delta (* (cos phi1) (sin theta)))
(.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 delta (.f64 (.f64 delta delta) #s(literal -1/6 binary64)) delta))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (*.f64 delta (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 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (.f64 (sin.f64 theta) (cos.f64 phi1)) (.f64 (pow.f64 delta #s(literal 4 binary64)) (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 (*.f64 delta delta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))))) delta)
(* delta (sin theta))
(*.f64 (sin.f64 theta) delta)
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(.f64 (sin.f64 theta) (fma.f64 delta (.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) delta))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) 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 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (sin.f64 theta) (.f64 (pow.f64 delta #s(literal 4 binary64)) (.f64 (sin.f64 theta) (fma.f64 (*.f64 delta delta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))))) delta)
(/ 1 (* delta (* (cos phi1) (sin theta))))
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 delta (cos.f64 phi1))) (sin.f64 theta))
(/ (+ (* 1/6 (/ (pow delta 2) (* (cos phi1) (sin theta)))) (/ 1 (* (cos phi1) (sin theta)))) delta)
(/.f64 (fma.f64 (/.f64 #s(literal 1/6 binary64) (sin.f64 theta)) (*.f64 delta (/.f64 delta (cos.f64 phi1))) (/.f64 (/.f64 #s(literal 1 binary64) (sin.f64 theta)) (cos.f64 phi1))) delta)
(/ (+ (* (pow delta 2) (+ (* 7/360 (/ (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/6 (/ 1 (* (cos phi1) (sin theta)))))) (/ 1 (* (cos phi1) (sin theta)))) delta)
(/.f64 (fma.f64 (.f64 (/.f64 delta (sin.f64 theta)) (/.f64 delta (cos.f64 phi1))) (fma.f64 (.f64 #s(literal 7/360 binary64) delta) delta #s(literal 1/6 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (sin.f64 theta)) (cos.f64 phi1))) delta)
(/ (+ (* (pow delta 2) (+ (* (pow delta 2) (+ (* 31/15120 (/ (pow delta 2) (* (cos phi1) (sin theta)))) (* 7/360 (/ 1 (* (cos phi1) (sin theta)))))) (* 1/6 (/ 1 (* (cos phi1) (sin theta)))))) (/ 1 (* (cos phi1) (sin theta)))) delta)
(/.f64 (fma.f64 (fma.f64 (.f64 (/.f64 delta (sin.f64 theta)) (/.f64 delta (cos.f64 phi1))) (fma.f64 (.f64 #s(literal 31/15120 binary64) delta) delta #s(literal 7/360 binary64)) (/.f64 (/.f64 #s(literal 1/6 binary64) (sin.f64 theta)) (cos.f64 phi1))) (*.f64 delta delta) (/.f64 (/.f64 #s(literal 1 binary64) (sin.f64 theta)) (cos.f64 phi1))) delta)
(* delta (* (cos phi1) (sin theta)))
(.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 delta (.f64 (.f64 delta delta) #s(literal -1/6 binary64)) delta))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (*.f64 delta (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 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (.f64 (sin.f64 theta) (cos.f64 phi1)) (.f64 (pow.f64 delta #s(literal 4 binary64)) (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 (*.f64 delta delta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))))) 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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* delta (* (cos phi1) (sin theta)))
(.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 delta (.f64 (.f64 delta delta) #s(literal -1/6 binary64)) delta))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (*.f64 delta (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 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (.f64 (sin.f64 theta) (cos.f64 phi1)) (.f64 (pow.f64 delta #s(literal 4 binary64)) (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 (*.f64 delta delta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))))) delta)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(- 1 (pow (sin phi1) 2))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(.f64 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (cos.f64 theta) (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 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 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 (neg.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (fma.f64 (sin.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (sin.f64 phi1) (.f64 (.f64 #s(literal 1/6 binary64) delta) (.f64 (cos.f64 theta) (cos.f64 phi1)))) #s(literal -1/2 binary64)) (.f64 delta delta)))
(- 1 (pow (sin phi1) 2))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(.f64 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (cos.f64 theta) (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 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 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 (neg.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (fma.f64 (sin.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (sin.f64 phi1) (.f64 (.f64 #s(literal 1/6 binary64) delta) (.f64 (cos.f64 theta) (cos.f64 phi1)))) #s(literal -1/2 binary64)) (.f64 delta delta)))
(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 (.f64 delta (cos.f64 theta)) (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 (.f64 (sin.f64 phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) delta) (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1)))) delta (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 (.f64 delta delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 #s(literal -1/6 binary64) (.f64 delta (cos.f64 phi1))) (cos.f64 theta) (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)))) (.f64 (sin.f64 phi1) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))
(- 1 (pow (sin phi1) 2))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(.f64 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (cos.f64 theta) (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 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 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 (neg.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (fma.f64 (sin.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (sin.f64 phi1) (.f64 (.f64 #s(literal 1/6 binary64) delta) (.f64 (cos.f64 theta) (cos.f64 phi1)))) #s(literal -1/2 binary64)) (.f64 delta delta)))
(+ 1 (* -1 (pow (sin phi1) 2)))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(+ 1 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* -1 (pow (sin phi1) 2))))
(.f64 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1)) (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 (neg.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 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 (neg.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (.f64 (fma.f64 (sin.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (sin.f64 phi1) (.f64 (.f64 #s(literal 1/6 binary64) delta) (.f64 (cos.f64 theta) (cos.f64 phi1)))) #s(literal -1/2 binary64)) (.f64 delta delta)))
(sin phi1)
(sin.f64 phi1)
(+ (sin phi1) (* delta (* (cos phi1) (cos theta))))
(fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))
(+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (cos.f64 phi1))) delta (sin.f64 phi1))
(+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (* delta (* (cos phi1) (cos theta)))))) (* (cos phi1) (cos theta)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) (.f64 delta (cos.f64 phi1))) (cos.f64 theta) (.f64 #s(literal -1/2 binary64) (sin.f64 phi1))) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) delta (sin.f64 phi1))
(sin phi1)
(sin.f64 phi1)
(+ (sin phi1) (* -1/2 (* (pow delta 2) (sin phi1))))
(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 binary64)) (sin.f64 phi1))
(+ (sin phi1) (* (pow delta 2) (+ (* -1/2 (sin phi1)) (* 1/24 (* (pow delta 2) (sin phi1))))))
(fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta delta) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 delta delta) (sin.f64 phi1))
(+ (sin phi1) (* (pow delta 2) (+ (* -1/2 (sin phi1)) (* (pow delta 2) (+ (* -1/720 (* (pow delta 2) (sin phi1))) (* 1/24 (sin phi1)))))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 binary64)) (sin.f64 phi1) (.f64 (pow.f64 delta #s(literal 4 binary64)) (.f64 (sin.f64 phi1) (fma.f64 (.f64 delta delta) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(* (cos delta) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(* (cos delta) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(* (cos delta) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(* (cos delta) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(/ 1 (* (cos phi1) (* (sin delta) (sin theta))))
(/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(* (cos delta) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(* (cos delta) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(* (cos delta) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(* (cos delta) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))

rewrite213.0ms (1.4%)

Memory

-13.6MiB live, 193.2MiB allocated

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	71	589
0	115	578
1	401	526
2	2942	526
0	8285	526

Stop Event

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

Counts

26 → 714

Calls

Call 1

Inputs
(exp.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)))
(fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))
(*.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.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))))
(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 theta) (sin.f64 delta)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))))
(atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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)))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)))
(log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
#s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1))
(-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(*.f64 (cos.f64 delta) (sin.f64 phi1))

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

eval331.0ms (2.1%)

Memory: 18.1MiB live, 392.9MiB allocated
Compiler: Compiled 72 626 to 4 088 computations (94.4% saved)

prune195.0ms (1.3%)

Memory

-30.8MiB live, 223.9MiB allocated

Pruning

58 alts after pruning (56 fresh and 2 done)

	Pruned	Kept	Total
New	1 875	42	1 917
Fresh	27	14	41
Picked	4	1	5
Done	0	1	1
Total	1 906	58	1 964

Accuracy

100.0%

Counts

1 964 → 58

Alt Table

Click to see full alt table

Status	Accuracy	Program
	54.7%	(/.f64 (-.f64 (pow.f64 (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(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (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))
	99.8%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
	77.9%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 binary64)) (sin.f64 phi1)))) (cos.f64 delta))) lambda1)
▶	92.8%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
	99.8%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (cos.f64 delta))) lambda1)
	80.2%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (cos.f64 phi1))) delta (sin.f64 phi1))) (cos.f64 delta))) lambda1)
	88.1%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 delta))) lambda1)
	91.7%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (sin.f64 phi1)) (cos.f64 delta))) lambda1)
▶	99.8%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1)
	77.7%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta)) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))))) lambda1)
	76.9%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta)) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))) lambda1)
	99.8%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
	88.4%	(+.f64 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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)
	78.7%	(+.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
	88.3%	(+.f64 lambda1 (atan2.f64 (/.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #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 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (pow.f64 (pow.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #s(literal 1/2 binary64)) #s(literal 2 binary64))))
	76.9%	(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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) (cos.f64 phi1)))))
	88.3%	(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	70.5%	(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (.f64 delta (cos.f64 phi1))) (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	85.7%	(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (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))))
	88.3%	(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 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))))
	44.5%	(+.f64 lambda1 (atan2.f64 (.f64 (/.f64 (sin.f64 delta) (pow.f64 (sin.f64 theta) #s(literal -1/2 binary64))) (/.f64 (cos.f64 phi1) (pow.f64 (sin.f64 theta) #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))))
	90.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)))) (pow.f64 (fma.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))) #s(literal -1 binary64)) (cos.f64 delta))))
✓	99.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
▶	91.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))))
	76.9%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) #s(approx (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))))
	88.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 #s(approx (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
	91.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
	94.2%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
	82.7%	(+.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)))))) #s(approx (* (sin phi1) (+ (* (* delta (cos theta)) (cos phi1)) (sin phi1))) (*.f64 (fma.f64 delta (cos.f64 phi1) (sin.f64 phi1)) (sin.f64 phi1)))))))
	78.7%	(+.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)))))) #s(approx (* (sin phi1) (+ (* (* delta (cos theta)) (cos phi1)) (sin phi1))) (.f64 (.f64 (cos.f64 theta) delta) phi1))))))
	50.9%	(+.f64 lambda1 (atan2.f64 (.f64 (exp.f64 (.f64 (log.f64 (.f64 (sin.f64 theta) (sin.f64 delta))) #s(literal 1 binary64))) (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 (sin.f64 theta) (fma.f64 delta (.f64 (.f64 #s(literal -1/6 binary64) delta) delta) 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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
	75.1%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
	76.3%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
	67.0%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ ( (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
	76.0%	(+.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))))
	50.5%	(+.f64 lambda1 (atan2.f64 (exp.f64 (.f64 (neg.f64 (log.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 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))))
	50.9%	(+.f64 lambda1 (atan2.f64 (exp.f64 (.f64 (log.f64 (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
	77.7%	(+.f64 lambda1 (atan2.f64 #s(approx (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.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))))
	70.5%	(+.f64 lambda1 (atan2.f64 #s(approx (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 delta (.f64 (.f64 delta delta) #s(literal -1/6 binary64)) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	74.5%	(+.f64 lambda1 (atan2.f64 #s(approx (/ 1 (/ (pow (sin theta) -1) (* (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))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	70.5%	(+.f64 lambda1 (atan2.f64 #s(approx (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	75.5%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) #s(approx (+ ( (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
	69.8%	(+.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))))
	86.2%	(+.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))))))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)))))
	81.1%	(+.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))))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 delta)))))
	86.3%	(+.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))))))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))
	71.9%	(+.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))))))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
✓	85.7%	(+.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))))
▶	68.5%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))))
	69.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 (.f64 delta delta) #s(literal -1/6 binary64)) delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	71.0%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))))
	73.2%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))))
▶	74.4%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))))
	54.6%	(.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (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(literal 2 binary64))) (pow.f64 (-.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)))) #s(literal -1 binary64)))
	99.8%	#s(approx (+ (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta))) lambda1) (fma.f64 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1))
	35.9%	#s(approx (+ (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta))) lambda1) (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))

Compiler

Compiled 2 820 to 2 190 computations (22.3% saved)

simplify178.0ms (1.2%)

Memory

42.0MiB live, 152.5MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score
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 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)))
cost-diff	0	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))
cost-diff	0	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))))
cost-diff	1408	(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
cost-diff	0	#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta))))
cost-diff	0	(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))
cost-diff	0	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))))
cost-diff	6720	(fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta))
cost-diff	0	#s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))
cost-diff	0	#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))))
cost-diff	0	(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))
cost-diff	0	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))))
cost-diff	0	(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))))
cost-diff	0	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1)
cost-diff	256	(-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))
cost-diff	6336	(-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	76	929
0	125	917
1	213	911
2	423	901
3	1084	900
4	2257	899
5	2977	899
6	3432	899
7	3637	899
8	3752	899
9	3958	899
10	5049	899
11	6970	899
12	7603	899
13	7979	899
0	8051	879

Stop Event

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

Calls

Call 1

Inputs
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1)
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (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
(-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))
(-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(cos.f64 delta)
(*.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(sin.f64 phi1)
#s(literal 2 binary64)
(.f64 (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))
(.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(cos.f64 theta)
lambda1
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)) #s(approx (* (sin theta) (sin delta)) (.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)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))))
#s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))
(*.f64 theta (sin.f64 delta))
theta
(sin.f64 delta)
delta
#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)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta))))
#s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))
(fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta))
(pow.f64 delta #s(literal 3 binary64))
delta
#s(literal 3 binary64)
(.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)))
(sin.f64 theta)
theta
(fma.f64 (*.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))
(*.f64 delta delta)
#s(literal 1/120 binary64)
#s(literal -1/6 binary64)
(*.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))
(cos.f64 delta)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
#s(literal 1 binary64)
(/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(cos.f64 delta)
#s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(sin.f64 phi1)
#s(literal 2 binary64)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (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 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))
(neg.f64 (sin.f64 phi1))
(sin.f64 phi1)
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1)))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(cos.f64 theta)
#s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1))
(cos.f64 delta)
lambda1

Outputs
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))))
(atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta))
(*.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 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi1)) (cos.f64 delta))
(cos.f64 delta)
(*.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(sin.f64 phi1)
#s(literal 2 binary64)
(.f64 (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))
(.f64 (.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (sin.f64 phi1)) (cos.f64 phi1))
(.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))
(.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (sin.f64 phi1))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(*.f64 (cos.f64 theta) (sin.f64 delta))
(cos.f64 theta)
lambda1
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) lambda1)
lambda1
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)))
#s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))
#s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))
(*.f64 theta (sin.f64 delta))
(*.f64 (sin.f64 delta) theta)
theta
(sin.f64 delta)
delta
#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)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 delta delta) #s(literal -1/6 binary64)) (pow.f64 delta #s(literal 3 binary64)) delta) (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)
lambda1
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 delta delta) #s(literal -1/6 binary64)) (pow.f64 delta #s(literal 3 binary64)) delta) (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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 delta delta) #s(literal -1/6 binary64)) (pow.f64 delta #s(literal 3 binary64)) delta) (sin.f64 theta))))
#s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))
#s(approx (* (sin theta) (sin delta)) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 delta delta) #s(literal -1/6 binary64)) (pow.f64 delta #s(literal 3 binary64)) delta) (sin.f64 theta)))
(fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta))
(.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 delta delta) #s(literal -1/6 binary64)) (pow.f64 delta #s(literal 3 binary64)) delta) (sin.f64 theta))
(pow.f64 delta #s(literal 3 binary64))
delta
#s(literal 3 binary64)
(.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)))
(.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 delta delta) #s(literal -1/6 binary64)) (sin.f64 theta))
(sin.f64 theta)
theta
(fma.f64 (*.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))
(fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))
(*.f64 delta delta)
#s(literal 1/120 binary64)
#s(literal -1/6 binary64)
(*.f64 (sin.f64 theta) delta)
(*.f64 delta (sin.f64 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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta)) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) lambda1)
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta)) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta))
(*.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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(literal 1 binary64)
(/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(/.f64 #s(literal -1 binary64) (-.f64 #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)))
(-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(cos.f64 delta)
#s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(sin.f64 phi1)
#s(literal 2 binary64)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)))
(atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta))
(*.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
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))
(fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(neg.f64 (sin.f64 phi1))
(sin.f64 phi1)
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1)))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(cos.f64 theta)
#s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1))
(cos.f64 delta)
lambda1

localize304.0ms (2%)

Memory

-6.0MiB live, 421.5MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.20326630317403704	(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1)))
accuracy	0.234375	(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy	0.5197448316658354	(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))
accuracy	29.302617255867155	#s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1))
accuracy	0.234375	(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy	0.26400375976844204	(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
accuracy	0.4747611668419882	(-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
accuracy	35.55308702073573	#s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
accuracy	4.516281860408017	(.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)))
accuracy	26.490471811926735	#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
accuracy	26.764793439166592	#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta))))
accuracy	32.21482284582307	#s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))
accuracy	0.14453125	(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))
accuracy	26.490471811926735	#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
accuracy	26.764793439166592	#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))))
accuracy	30.78802188295308	#s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))
accuracy	0.23046875	(.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta)))
accuracy	0.234375	(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy	0.26400375976844204	(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
accuracy	0.5782359911423876	(-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))

Samples

248.0ms

256×

valid

Compiler

Compiled 751 to 64 computations (91.5% saved)

Precisions

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

ival-cos: 42.0ms (21.7% of total)

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

ival-asin: 31.0ms (16% of total)

ival-add: 29.0ms (15% of total)

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

ival-atan2: 8.0ms (4.1% of total)

const: 6.0ms (3.1% of total)

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

ival-pow: 4.0ms (2.1% of total)

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

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

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

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

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

exact: 0.0ms (0% of total)

series150.0ms (1%)

Memory

5.7MiB live, 183.5MiB allocated

Counts

29 → 996

Calls

Call 1

Inputs
#s(alt (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())
#s(alt (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) (patch (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) #<representation binary64>) () ())
#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())
#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())
#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) #<representation binary64>) () ())
#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #<representation binary64>) () ())
#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))) #<representation binary64>) () ())
#s(alt (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) (patch (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())
#s(alt (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) #<representation binary64>) () ())
#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) #<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 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())
#s(alt (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (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 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (sin.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 (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta))) (patch #s(approx ( (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta))) #<representation binary64>) () ())
#s(alt (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (patch (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) #<representation binary64>) () ())
#s(alt #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())
#s(alt #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) (patch #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) #<representation binary64>) () ())
#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())
#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) #<representation binary64>) () ())

Outputs
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) (taylor 0 lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (taylor 0 lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1))))) (taylor 0 theta) (#s(alt (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) (patch (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1))))) (taylor 0 theta) (#s(alt (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) (patch (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (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))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1))))) (taylor 0 theta) (#s(alt (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) (patch (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (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))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1))))) (taylor 0 theta) (#s(alt (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) (patch (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#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 theta) (sin delta)) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) #<representation binary64>) () ())) ())
#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 theta) (sin delta)) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) #<representation binary64>) () ())) ())
#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 theta) (sin delta)) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) #<representation binary64>) () ())) ())
#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 theta) (sin delta)) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) #<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 theta) (sin delta)) (.f64 theta (sin.f64 delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #<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 theta) (sin delta)) (.f64 theta (sin.f64 delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #<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 theta) (sin delta)) (.f64 theta (sin.f64 delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #<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 theta) (sin delta)) (.f64 theta (sin.f64 delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* theta (sin delta)) (taylor 0 theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (patch #s(approx ( (sin theta) (sin delta)) (*.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 #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (patch #s(approx ( (sin theta) (sin delta)) (*.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 #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ delta (* (pow delta 3) (- (* 1/120 (pow delta 2)) 1/6)))) (taylor 0 theta) (#s(alt (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) (patch (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ delta (+ (* (pow delta 3) (- (* 1/120 (pow delta 2)) 1/6)) (* (pow theta 2) (+ (* -1/6 delta) (* -1/6 (* (pow delta 3) (- (* 1/120 (pow delta 2)) 1/6)))))))) (taylor 0 theta) (#s(alt (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) (patch (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ delta (+ (* (pow delta 3) (- (* 1/120 (pow delta 2)) 1/6)) (* (pow theta 2) (+ (* -1/6 delta) (+ (* -1/6 (* (pow delta 3) (- (* 1/120 (pow delta 2)) 1/6))) (* (pow theta 2) (+ (* 1/120 delta) (* 1/120 (* (pow delta 3) (- (* 1/120 (pow delta 2)) 1/6))))))))))) (taylor 0 theta) (#s(alt (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) (patch (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) #<representation binary64>) () ())) ())
#s(alt (* theta (+ delta (+ (* (pow delta 3) (- (* 1/120 (pow delta 2)) 1/6)) (* (pow theta 2) (+ (* -1/6 delta) (+ (* -1/6 (* (pow delta 3) (- (* 1/120 (pow delta 2)) 1/6))) (* (pow theta 2) (+ (* 1/120 delta) (+ (* 1/120 (* (pow delta 3) (- (* 1/120 (pow delta 2)) 1/6))) (* (pow theta 2) (+ (* -1/5040 delta) (* -1/5040 (* (pow delta 3) (- (* 1/120 (pow delta 2)) 1/6)))))))))))))) (taylor 0 theta) (#s(alt (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) (patch (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) 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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) #<representation binary64>) () ())) ())
#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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) #<representation binary64>) () ())) ())
#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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) #<representation binary64>) () ())) ())
#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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (taylor 0 theta) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) #<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 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 theta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 theta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 theta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 theta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (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 phi1)) (taylor 0 theta) (#s(alt (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow theta 2) (* (sin delta) (sin phi1)))) (* (sin delta) (sin phi1))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (sin phi1))) (* 1/24 (* (pow theta 2) (* (sin delta) (sin phi1))))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin delta) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (sin delta) (sin phi1)))) (* 1/24 (* (sin delta) (sin phi1)))))))) (taylor 0 theta) (#s(alt (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (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 #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 (* theta (sin delta)) (taylor 0 theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta))) (patch #s(approx ( (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta))) #<representation binary64>) () ())) ())
#s(alt (* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta))))) (taylor 0 theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta))) (patch #s(approx ( (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) 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 #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta))) (patch #s(approx ( (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) 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 #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta))) (patch #s(approx ( (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta))) #<representation binary64>) () ())) ())
#s(alt (* theta (- (* 1/120 (pow delta 2)) 1/6)) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (patch (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) #<representation binary64>) () ())) ())
#s(alt (* theta (- (+ (* -1/6 (* (pow theta 2) (- (* 1/120 (pow delta 2)) 1/6))) (* 1/120 (pow delta 2))) 1/6)) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (patch (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) #<representation binary64>) () ())) ())
#s(alt (* theta (- (+ (* 1/120 (pow delta 2)) (* (pow theta 2) (+ (* -1/6 (- (* 1/120 (pow delta 2)) 1/6)) (* 1/120 (* (pow theta 2) (- (* 1/120 (pow delta 2)) 1/6)))))) 1/6)) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (patch (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) #<representation binary64>) () ())) ())
#s(alt (* theta (- (+ (* 1/120 (pow delta 2)) (* (pow theta 2) (+ (* -1/6 (- (* 1/120 (pow delta 2)) 1/6)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (- (* 1/120 (pow delta 2)) 1/6))) (* 1/120 (- (* 1/120 (pow delta 2)) 1/6))))))) 1/6)) (taylor 0 theta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (patch (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (taylor 0 theta) (#s(alt #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<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 #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<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 #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<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 #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))) (taylor 0 theta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))) (taylor 0 theta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (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 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (+ (* -1 (* (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/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 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) (taylor 0 theta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) #<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 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) #<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 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) #<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 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf theta) (#s(alt (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) (patch (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf theta) (#s(alt (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) (patch (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf theta) (#s(alt (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) (patch (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf theta) (#s(alt (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) (patch (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf theta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf theta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf theta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf theta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) #<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 theta) (sin delta)) (.f64 theta (sin.f64 delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #<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 theta) (sin delta)) (.f64 theta (sin.f64 delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #<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 theta) (sin delta)) (.f64 theta (sin.f64 delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #<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 theta) (sin delta)) (.f64 theta (sin.f64 delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* delta (sin theta)) (* (pow delta 3) (* (sin theta) (- (* 1/120 (pow delta 2)) 1/6)))) (taylor inf theta) (#s(alt (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) (patch (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) #<representation binary64>) () ())) ())
#s(alt (+ (* delta (sin theta)) (* (pow delta 3) (* (sin theta) (- (* 1/120 (pow delta 2)) 1/6)))) (taylor inf theta) (#s(alt (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) (patch (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) #<representation binary64>) () ())) ())
#s(alt (+ (* delta (sin theta)) (* (pow delta 3) (* (sin theta) (- (* 1/120 (pow delta 2)) 1/6)))) (taylor inf theta) (#s(alt (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) (patch (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) #<representation binary64>) () ())) ())
#s(alt (+ (* delta (sin theta)) (* (pow delta 3) (* (sin theta) (- (* 1/120 (pow delta 2)) 1/6)))) (taylor inf theta) (#s(alt (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) (patch (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) 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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf theta) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) #<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 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor inf theta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor inf theta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor inf theta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor inf theta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.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 (* (cos theta) (* (sin delta) (sin phi1))) (taylor inf theta) (#s(alt (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor inf theta) (#s(alt (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor inf theta) (#s(alt (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor inf theta) (#s(alt (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (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 #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 (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta))) (patch #s(approx ( (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta))) (patch #s(approx ( (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta))) (patch #s(approx ( (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta))) (patch #s(approx ( (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta))) #<representation binary64>) () ())) ())
#s(alt (* (sin theta) (- (* 1/120 (pow delta 2)) 1/6)) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (patch (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sin theta) (- (* 1/120 (pow delta 2)) 1/6)) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (patch (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sin theta) (- (* 1/120 (pow delta 2)) 1/6)) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (patch (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sin theta) (- (* 1/120 (pow delta 2)) 1/6)) (taylor inf theta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (patch (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf theta) (#s(alt #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf theta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf theta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf theta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf theta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf theta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf theta) (#s(alt (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) (patch (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf theta) (#s(alt (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) (patch (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf theta) (#s(alt (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) (patch (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf theta) (#s(alt (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) (patch (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf theta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) #<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 theta) (sin delta)) (.f64 theta (sin.f64 delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #<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 theta) (sin delta)) (.f64 theta (sin.f64 delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #<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 theta) (sin delta)) (.f64 theta (sin.f64 delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #<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 theta) (sin delta)) (.f64 theta (sin.f64 delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (+ (* delta (sin theta)) (* (pow delta 3) (* (sin theta) (- (* 1/120 (pow delta 2)) 1/6)))) (taylor -inf theta) (#s(alt (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) (patch (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) #<representation binary64>) () ())) ())
#s(alt (+ (* delta (sin theta)) (* (pow delta 3) (* (sin theta) (- (* 1/120 (pow delta 2)) 1/6)))) (taylor -inf theta) (#s(alt (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) (patch (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) #<representation binary64>) () ())) ())
#s(alt (+ (* delta (sin theta)) (* (pow delta 3) (* (sin theta) (- (* 1/120 (pow delta 2)) 1/6)))) (taylor -inf theta) (#s(alt (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) (patch (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) #<representation binary64>) () ())) ())
#s(alt (+ (* delta (sin theta)) (* (pow delta 3) (* (sin theta) (- (* 1/120 (pow delta 2)) 1/6)))) (taylor -inf theta) (#s(alt (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) (patch (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) 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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf theta) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) #<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 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor -inf theta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor -inf theta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor -inf theta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor -inf theta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.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 (* (cos theta) (* (sin delta) (sin phi1))) (taylor -inf theta) (#s(alt (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor -inf theta) (#s(alt (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor -inf theta) (#s(alt (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor -inf theta) (#s(alt (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (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 #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 (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta))) (patch #s(approx ( (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta))) (patch #s(approx ( (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta))) (patch #s(approx ( (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf theta) (#s(alt #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta))) (patch #s(approx ( (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta))) #<representation binary64>) () ())) ())
#s(alt (* (sin theta) (- (* 1/120 (pow delta 2)) 1/6)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (patch (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sin theta) (- (* 1/120 (pow delta 2)) 1/6)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (patch (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sin theta) (- (* 1/120 (pow delta 2)) 1/6)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (patch (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sin theta) (- (* 1/120 (pow delta 2)) 1/6)) (taylor -inf theta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (patch (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf theta) (#s(alt #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf theta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf theta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf theta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf theta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf theta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (pow phi1 2) (cos delta)))) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta)))) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<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 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) (patch (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) (patch (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) (patch (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (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 (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) (patch (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#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 theta) (sin delta)) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) #<representation binary64>) () ())) ())
#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 theta) (sin delta)) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) #<representation binary64>) () ())) ())
#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 theta) (sin delta)) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) #<representation binary64>) () ())) ())
#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 theta) (sin delta)) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor 0 phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #<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 theta) (sin delta)) (.f64 theta (sin.f64 delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #<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 theta) (sin delta)) (.f64 theta (sin.f64 delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #<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 theta) (sin delta)) (.f64 theta (sin.f64 delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) #<representation binary64>) () ())) ())
#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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) #<representation binary64>) () ())) ())
#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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) #<representation binary64>) () ())) ())
#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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor 0 phi1) (#s(alt #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) #<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 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (pow phi1 2) (taylor 0 phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2)))) (taylor 0 phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 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 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 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 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* (cos theta) (sin delta)))) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/6 (* (cos theta) (sin delta))) (* 1/120 (* (pow phi1 2) (* (cos theta) (sin delta)))))))) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* 1/120 (* (cos theta) (sin delta))))))))) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<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 (* phi1 (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))) (taylor 0 phi1) (#s(alt #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<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 #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<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 #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta))))) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (cos delta)) (taylor 0 phi1) (#s(alt #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) (patch #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (cos delta) (* -1/6 (* (pow phi1 2) (cos delta))))) (taylor 0 phi1) (#s(alt #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) (patch #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (cos delta) (* (pow phi1 2) (+ (* -1/6 (cos delta)) (* 1/120 (* (pow phi1 2) (cos delta))))))) (taylor 0 phi1) (#s(alt #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) (patch #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (cos delta) (* (pow phi1 2) (+ (* -1/6 (cos delta)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (cos delta))) (* 1/120 (cos delta)))))))) (taylor 0 phi1) (#s(alt #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) (patch #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos delta) (taylor 0 phi1) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (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 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (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 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (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 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (sin delta)) (taylor 0 phi1) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (cos delta) (* -1/2 (* phi1 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta))) (taylor 0 phi1) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) #<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 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf phi1) (#s(alt (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) (patch (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf phi1) (#s(alt (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) (patch (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf phi1) (#s(alt (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) (patch (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf phi1) (#s(alt (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) (patch (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) #<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 theta) (sin delta)) (.f64 theta (sin.f64 delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #<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 theta) (sin delta)) (.f64 theta (sin.f64 delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #<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 theta) (sin delta)) (.f64 theta (sin.f64 delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #<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 theta) (sin delta)) (.f64 theta (sin.f64 delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) #<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 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor inf phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor inf phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor inf phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor inf phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor inf phi1) (#s(alt (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor inf phi1) (#s(alt (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor inf phi1) (#s(alt (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor inf phi1) (#s(alt (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (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 #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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf phi1) (#s(alt #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor inf phi1) (#s(alt #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) (patch #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor inf phi1) (#s(alt #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) (patch #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor inf phi1) (#s(alt #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) (patch #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor inf phi1) (#s(alt #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) (patch #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf phi1) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf phi1) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf phi1) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf phi1) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf phi1) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) (patch (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) (patch (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) (patch (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) (patch (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) #<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 theta) (sin delta)) (.f64 theta (sin.f64 delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #<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 theta) (sin delta)) (.f64 theta (sin.f64 delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #<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 theta) (sin delta)) (.f64 theta (sin.f64 delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #<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 theta) (sin delta)) (.f64 theta (sin.f64 delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf phi1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) #<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 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor -inf phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor -inf phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor -inf phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor -inf phi1) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor -inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor -inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor -inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor -inf phi1) (#s(alt (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (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 #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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf phi1) (#s(alt #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor -inf phi1) (#s(alt #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) (patch #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor -inf phi1) (#s(alt #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) (patch #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor -inf phi1) (#s(alt #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) (patch #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor -inf phi1) (#s(alt #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) (patch #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf phi1) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf phi1) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf phi1) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf phi1) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf phi1) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (* (pow delta 2) (+ 1/2 (* -1/2 (pow (sin phi1) 2)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* (pow delta 2) (- (* (pow delta 2) (- 1/24 (* 1/24 (pow (sin phi1) 2)))) (+ 1/2 (* -1/2 (pow (sin phi1) 2)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* (pow delta 2) (- (* (pow delta 2) (- (+ 1/24 (* -1 (* (pow delta 2) (+ 1/720 (* -1/720 (pow (sin phi1) 2)))))) (* 1/24 (pow (sin phi1) 2)))) (+ 1/2 (* -1/2 (pow (sin phi1) 2)))))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) (patch (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (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 (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) (patch (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (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 (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) (patch (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (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 (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) (patch (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#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 theta) (sin delta)) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) #<representation binary64>) () ())) ())
#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 theta) (sin delta)) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) #<representation binary64>) () ())) ())
#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 theta) (sin delta)) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) #<representation binary64>) () ())) ())
#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 theta) (sin delta)) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) #<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 theta) (sin delta)) (.f64 theta (sin.f64 delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #<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 theta) (sin delta)) (.f64 theta (sin.f64 delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #<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 theta) (sin delta)) (.f64 theta (sin.f64 delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #<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 theta) (sin delta)) (.f64 theta (sin.f64 delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor 0 delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta))))) (taylor 0 delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (patch #s(approx ( (sin theta) (sin delta)) (*.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 #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (patch #s(approx ( (sin theta) (sin delta)) (*.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 #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* delta (sin theta)) (taylor 0 delta) (#s(alt (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) (patch (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta))))) (taylor 0 delta) (#s(alt (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) (patch (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) 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 (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) (patch (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) 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 (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) (patch (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) 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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) #<representation binary64>) () ())) ())
#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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) #<representation binary64>) () ())) ())
#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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) #<representation binary64>) () ())) ())
#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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) #<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 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 delta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 delta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 delta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor 0 delta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.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 (* delta (* (cos theta) (sin phi1))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* -1/6 (* (pow delta 2) (* (cos theta) (sin phi1)))) (* (cos theta) (sin phi1)))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos theta) (sin phi1)) (* (pow delta 2) (+ (* -1/6 (* (cos theta) (sin phi1))) (* 1/120 (* (pow delta 2) (* (cos theta) (sin phi1)))))))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (* (cos theta) (sin phi1)) (* (pow delta 2) (+ (* -1/6 (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos theta) (sin phi1)))) (* 1/120 (* (cos theta) (sin phi1))))))))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (sin.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 (* delta (sin theta)) (taylor 0 delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta))) (patch #s(approx ( (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta))) #<representation binary64>) () ())) ())
#s(alt (* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta))))) (taylor 0 delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta))) (patch #s(approx ( (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) 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 #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta))) (patch #s(approx ( (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) 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 #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta))) (patch #s(approx ( (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta))) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (sin theta)) (taylor 0 delta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (patch (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (patch (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (patch (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))) (taylor 0 delta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (patch (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow (sin phi1) 2) (taylor 0 delta) (#s(alt #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<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 #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<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 #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1 (pow (sin phi1) 2)) (taylor 0 delta) (#s(alt (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sin phi1) (taylor 0 delta) (#s(alt #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) (patch #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi1) (* -1/2 (* (pow delta 2) (sin phi1)))) (taylor 0 delta) (#s(alt #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) (patch #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi1) (* (pow delta 2) (+ (* -1/2 (sin phi1)) (* 1/24 (* (pow delta 2) (sin phi1)))))) (taylor 0 delta) (#s(alt #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) (patch #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi1) (* (pow delta 2) (+ (* -1/2 (sin phi1)) (* (pow delta 2) (+ (* -1/720 (* (pow delta 2) (sin phi1))) (* 1/24 (sin phi1))))))) (taylor 0 delta) (#s(alt #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) (patch #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (pow (sin phi1) 2))) (taylor 0 delta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (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 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (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 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (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 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (sin phi1) (taylor 0 delta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))) (taylor 0 delta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))))) (taylor 0 delta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) #<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 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (taylor inf delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf delta) (#s(alt (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) (patch (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf delta) (#s(alt (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) (patch (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf delta) (#s(alt (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) (patch (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor inf delta) (#s(alt (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) (patch (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf delta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf delta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf delta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor inf delta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) #<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 theta) (sin delta)) (.f64 theta (sin.f64 delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #<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 theta) (sin delta)) (.f64 theta (sin.f64 delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #<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 theta) (sin delta)) (.f64 theta (sin.f64 delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #<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 theta) (sin delta)) (.f64 theta (sin.f64 delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* 1/120 (* (pow delta 5) (sin theta))) (taylor inf delta) (#s(alt (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) (patch (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) #<representation binary64>) () ())) ())
#s(alt (* (pow delta 5) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (* 1/120 (sin theta)))) (taylor inf delta) (#s(alt (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) (patch (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) #<representation binary64>) () ())) ())
#s(alt (* (pow delta 5) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (+ (* 1/120 (sin theta)) (/ (sin theta) (pow delta 4))))) (taylor inf delta) (#s(alt (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) (patch (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) #<representation binary64>) () ())) ())
#s(alt (* (pow delta 5) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (+ (* 1/120 (sin theta)) (/ (sin theta) (pow delta 4))))) (taylor inf delta) (#s(alt (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) (patch (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) 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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor inf delta) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) #<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 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor inf delta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor inf delta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor inf delta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor inf delta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.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 (* (cos theta) (* (sin delta) (sin phi1))) (taylor inf delta) (#s(alt (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor inf delta) (#s(alt (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor inf delta) (#s(alt (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor inf delta) (#s(alt (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (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 #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 (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta))) (patch #s(approx ( (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta))) (patch #s(approx ( (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta))) (patch #s(approx ( (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta))) (patch #s(approx ( (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta))) #<representation binary64>) () ())) ())
#s(alt (* 1/120 (* (pow delta 2) (sin theta))) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (patch (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow delta 2) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (* 1/120 (sin theta)))) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (patch (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow delta 2) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (* 1/120 (sin theta)))) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (patch (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow delta 2) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (* 1/120 (sin theta)))) (taylor inf delta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (patch (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor inf delta) (#s(alt #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor inf delta) (#s(alt #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) (patch #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor inf delta) (#s(alt #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) (patch #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor inf delta) (#s(alt #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) (patch #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor inf delta) (#s(alt #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) (patch #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor inf delta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf delta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf delta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf delta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor inf delta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (taylor -inf delta) (#s(alt (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf delta) (#s(alt (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) (patch (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf delta) (#s(alt (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) (patch (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf delta) (#s(alt (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) (patch (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (taylor -inf delta) (#s(alt (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) (patch (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))) (taylor -inf delta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (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)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 theta) (sin delta)) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) #<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 theta) (sin delta)) (.f64 theta (sin.f64 delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #<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 theta) (sin delta)) (.f64 theta (sin.f64 delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #<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 theta) (sin delta)) (.f64 theta (sin.f64 delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #<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 theta) (sin delta)) (.f64 theta (sin.f64 delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (patch #s(approx ( (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (* 1/120 (* (pow delta 5) (sin theta))) (taylor -inf delta) (#s(alt (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) (patch (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow delta 5) (+ (* -1/120 (sin theta)) (* 1/6 (/ (sin theta) (pow delta 2)))))) (taylor -inf delta) (#s(alt (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) (patch (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow delta 5) (+ (* -1 (/ (sin theta) (pow delta 4))) (+ (* -1/120 (sin theta)) (* 1/6 (/ (sin theta) (pow delta 2))))))) (taylor -inf delta) (#s(alt (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) (patch (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow delta 5) (+ (* -1 (/ (sin theta) (pow delta 4))) (+ (* -1/120 (sin theta)) (* 1/6 (/ (sin theta) (pow delta 2))))))) (taylor -inf delta) (#s(alt (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)) (patch (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) 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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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)))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) #<representation binary64>) () ())) ())
#s(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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) (patch (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))) #<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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) (patch #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))) #<representation binary64>) () ())) ())
#s(alt (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (taylor -inf delta) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) #<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 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor -inf delta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor -inf delta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor -inf delta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (taylor -inf delta) (#s(alt (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) (patch (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) (patch (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.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 (* (cos theta) (* (sin delta) (sin phi1))) (taylor -inf delta) (#s(alt (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor -inf delta) (#s(alt (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor -inf delta) (#s(alt (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) #<representation binary64>) () ())) ())
#s(alt (* (cos theta) (* (sin delta) (sin phi1))) (taylor -inf delta) (#s(alt (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (patch (.f64 (sin.f64 phi1) (.f64 (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 #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 (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta))) (patch #s(approx ( (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta))) (patch #s(approx ( (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta))) (patch #s(approx ( (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta))) #<representation binary64>) () ())) ())
#s(alt (* (sin delta) (sin theta)) (taylor -inf delta) (#s(alt #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta))) (patch #s(approx ( (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta))) #<representation binary64>) () ())) ())
#s(alt (* 1/120 (* (pow delta 2) (sin theta))) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (patch (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow delta 2) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (* 1/120 (sin theta)))) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (patch (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow delta 2) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (* 1/120 (sin theta)))) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (patch (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow delta 2) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (* 1/120 (sin theta)))) (taylor -inf delta) (#s(alt (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (patch (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (taylor -inf delta) (#s(alt #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (patch #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.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 (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (patch (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor -inf delta) (#s(alt #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) (patch #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor -inf delta) (#s(alt #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) (patch #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor -inf delta) (#s(alt #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) (patch #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos delta) (sin phi1)) (taylor -inf delta) (#s(alt #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) (patch #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (taylor -inf delta) (#s(alt (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) (patch (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf delta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf delta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf delta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))) (taylor -inf delta) (#s(alt (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (patch (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) #<representation binary64>) () ())) ())

Calls

12 calls:

Time	Variable		Point	Expression
38.0ms	delta	@	inf	((- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1))) (+ (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1)))) lambda1) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1)))) (+ 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 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (+ (* (pow delta 3) (* (sin theta) (+ (* (* delta delta) 1/120) -1/6))) (* (sin theta) delta)) (+ 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 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)))))) (* (* (sin theta) (sin delta)) (cos phi1)) (+ (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta))) lambda1) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta))) (* (sin theta) (sin delta)) (pow (sin phi1) 2) (* (sin phi1) (* (sin delta) (cos theta))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin theta) (sin delta)) (* (sin theta) (+ (* (* delta delta) 1/120) -1/6)) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))) (* (cos delta) (sin phi1)) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))))
9.0ms	theta	@	-inf	((- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1))) (+ (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1)))) lambda1) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1)))) (+ 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 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (+ (* (pow delta 3) (* (sin theta) (+ (* (* delta delta) 1/120) -1/6))) (* (sin theta) delta)) (+ 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 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)))))) (* (* (sin theta) (sin delta)) (cos phi1)) (+ (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta))) lambda1) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta))) (* (sin theta) (sin delta)) (pow (sin phi1) 2) (* (sin phi1) (* (sin delta) (cos theta))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin theta) (sin delta)) (* (sin theta) (+ (* (* delta delta) 1/120) -1/6)) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))) (* (cos delta) (sin phi1)) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))))
5.0ms	theta	@	inf	((- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1))) (+ (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1)))) lambda1) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1)))) (+ 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 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (+ (* (pow delta 3) (* (sin theta) (+ (* (* delta delta) 1/120) -1/6))) (* (sin theta) delta)) (+ 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 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)))))) (* (* (sin theta) (sin delta)) (cos phi1)) (+ (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta))) lambda1) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta))) (* (sin theta) (sin delta)) (pow (sin phi1) 2) (* (sin phi1) (* (sin delta) (cos theta))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin theta) (sin delta)) (* (sin theta) (+ (* (* delta delta) 1/120) -1/6)) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))) (* (cos delta) (sin phi1)) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))))
5.0ms	delta	@	-inf	((- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1))) (+ (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1)))) lambda1) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1)))) (+ 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 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (+ (* (pow delta 3) (* (sin theta) (+ (* (* delta delta) 1/120) -1/6))) (* (sin theta) delta)) (+ 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 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)))))) (* (* (sin theta) (sin delta)) (cos phi1)) (+ (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta))) lambda1) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta))) (* (sin theta) (sin delta)) (pow (sin phi1) 2) (* (sin phi1) (* (sin delta) (cos theta))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin theta) (sin delta)) (* (sin theta) (+ (* (* delta delta) 1/120) -1/6)) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))) (* (cos delta) (sin phi1)) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))))
4.0ms	phi1	@	inf	((- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1))) (+ (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1)))) lambda1) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1)))) (+ 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 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (+ (* (pow delta 3) (* (sin theta) (+ (* (* delta delta) 1/120) -1/6))) (* (sin theta) delta)) (+ 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 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)))))) (* (* (sin theta) (sin delta)) (cos phi1)) (+ (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta))) lambda1) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta))) (* (sin theta) (sin delta)) (pow (sin phi1) 2) (* (sin phi1) (* (sin delta) (cos theta))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin theta) (sin delta)) (* (sin theta) (+ (* (* delta delta) 1/120) -1/6)) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))) (* (cos delta) (sin phi1)) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))))

simplify311.0ms (2%)

Memory

-16.0MiB live, 297.9MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	580	22908
1	2030	21383
2	6951	21290
0	8071	20334

Stop Event

1×	iter limit
1×	node limit

Counts

996 → 986

Calls

Call 1

Inputs
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin 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)))
(* 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
(* 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
(* 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
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
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
(* -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
(* -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
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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) (* -1 (* (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) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)) 1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin 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))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin 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))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* 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)))))))))
(* 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))))))))
(* theta (+ delta (* (pow delta 3) (- (* 1/120 (pow delta 2)) 1/6))))
(* theta (+ delta (+ (* (pow delta 3) (- (* 1/120 (pow delta 2)) 1/6)) (* (pow theta 2) (+ (* -1/6 delta) (* -1/6 (* (pow delta 3) (- (* 1/120 (pow delta 2)) 1/6))))))))
(* theta (+ delta (+ (* (pow delta 3) (- (* 1/120 (pow delta 2)) 1/6)) (* (pow theta 2) (+ (* -1/6 delta) (+ (* -1/6 (* (pow delta 3) (- (* 1/120 (pow delta 2)) 1/6))) (* (pow theta 2) (+ (* 1/120 delta) (* 1/120 (* (pow delta 3) (- (* 1/120 (pow delta 2)) 1/6)))))))))))
(* theta (+ delta (+ (* (pow delta 3) (- (* 1/120 (pow delta 2)) 1/6)) (* (pow theta 2) (+ (* -1/6 delta) (+ (* -1/6 (* (pow delta 3) (- (* 1/120 (pow delta 2)) 1/6))) (* (pow theta 2) (+ (* 1/120 delta) (+ (* 1/120 (* (pow delta 3) (- (* 1/120 (pow delta 2)) 1/6))) (* (pow theta 2) (+ (* -1/5040 delta) (* -1/5040 (* (pow delta 3) (- (* 1/120 (pow delta 2)) 1/6))))))))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* 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 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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* 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)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (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 phi1))
(+ (* -1/2 (* (pow theta 2) (* (sin delta) (sin phi1)))) (* (sin delta) (sin phi1)))
(+ (* (sin delta) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (sin phi1))) (* 1/24 (* (pow theta 2) (* (sin delta) (sin phi1)))))))
(+ (* (sin delta) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (sin delta) (sin phi1)))) (* 1/24 (* (sin delta) (sin phi1))))))))
(- (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)))))
(* 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))))))))
(* theta (- (* 1/120 (pow delta 2)) 1/6))
(* theta (- (+ (* -1/6 (* (pow theta 2) (- (* 1/120 (pow delta 2)) 1/6))) (* 1/120 (pow delta 2))) 1/6))
(* theta (- (+ (* 1/120 (pow delta 2)) (* (pow theta 2) (+ (* -1/6 (- (* 1/120 (pow delta 2)) 1/6)) (* 1/120 (* (pow theta 2) (- (* 1/120 (pow delta 2)) 1/6)))))) 1/6))
(* theta (- (+ (* 1/120 (pow delta 2)) (* (pow theta 2) (+ (* -1/6 (- (* 1/120 (pow delta 2)) 1/6)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (- (* 1/120 (pow delta 2)) 1/6))) (* 1/120 (- (* 1/120 (pow delta 2)) 1/6))))))) 1/6))
(* (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)))))))))
(- (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) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (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 (* (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/24 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))))
(+ (* (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) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (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))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(+ (* delta (sin theta)) (* (pow delta 3) (* (sin theta) (- (* 1/120 (pow delta 2)) 1/6))))
(+ (* delta (sin theta)) (* (pow delta 3) (* (sin theta) (- (* 1/120 (pow delta 2)) 1/6))))
(+ (* delta (sin theta)) (* (pow delta 3) (* (sin theta) (- (* 1/120 (pow delta 2)) 1/6))))
(+ (* delta (sin theta)) (* (pow delta 3) (* (sin theta) (- (* 1/120 (pow delta 2)) 1/6))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (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 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))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(- (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))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin theta) (- (* 1/120 (pow delta 2)) 1/6))
(* (sin theta) (- (* 1/120 (pow delta 2)) 1/6))
(* (sin theta) (- (* 1/120 (pow delta 2)) 1/6))
(* (sin theta) (- (* 1/120 (pow delta 2)) 1/6))
(* (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)))))
(- (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) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (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) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (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))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(+ (* delta (sin theta)) (* (pow delta 3) (* (sin theta) (- (* 1/120 (pow delta 2)) 1/6))))
(+ (* delta (sin theta)) (* (pow delta 3) (* (sin theta) (- (* 1/120 (pow delta 2)) 1/6))))
(+ (* delta (sin theta)) (* (pow delta 3) (* (sin theta) (- (* 1/120 (pow delta 2)) 1/6))))
(+ (* delta (sin theta)) (* (pow delta 3) (* (sin theta) (- (* 1/120 (pow delta 2)) 1/6))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (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 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))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(- (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))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin theta) (- (* 1/120 (pow delta 2)) 1/6))
(* (sin theta) (- (* 1/120 (pow delta 2)) 1/6))
(* (sin theta) (- (* 1/120 (pow delta 2)) 1/6))
(* (sin theta) (- (* 1/120 (pow delta 2)) 1/6))
(* (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)))))
(- (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) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (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)
(+ (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 (* 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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (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))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (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 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)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (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))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(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))))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* (cos theta) (sin delta))))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/6 (* (cos theta) (sin delta))) (* 1/120 (* (pow phi1 2) (* (cos theta) (sin delta))))))))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* 1/120 (* (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)))))
(* 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))))
(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)))))
(* phi1 (cos delta))
(* phi1 (+ (cos delta) (* -1/6 (* (pow phi1 2) (cos delta)))))
(* phi1 (+ (cos delta) (* (pow phi1 2) (+ (* -1/6 (cos delta)) (* 1/120 (* (pow phi1 2) (cos delta)))))))
(* phi1 (+ (cos delta) (* (pow phi1 2) (+ (* -1/6 (cos delta)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (cos delta))) (* 1/120 (cos delta))))))))
(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 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) (* (cos delta) (pow (sin phi1) 2)))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (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 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))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(- (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))))))
(* (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)))))
(- (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 delta) (sin phi1))
(* (cos delta) (sin phi1))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (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) (* (cos delta) (pow (sin phi1) 2)))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (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 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))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(- (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))))))
(* (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)))))
(- (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 delta) (sin phi1))
(* (cos delta) (sin phi1))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (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))))
(- 1 (pow (sin phi1) 2))
(- (+ 1 (* -1 (* (pow delta 2) (+ 1/2 (* -1/2 (pow (sin phi1) 2)))))) (pow (sin phi1) 2))
(- (+ 1 (* (pow delta 2) (- (* (pow delta 2) (- 1/24 (* 1/24 (pow (sin phi1) 2)))) (+ 1/2 (* -1/2 (pow (sin phi1) 2)))))) (pow (sin phi1) 2))
(- (+ 1 (* (pow delta 2) (- (* (pow delta 2) (- (+ 1/24 (* -1 (* (pow delta 2) (+ 1/720 (* -1/720 (pow (sin phi1) 2)))))) (* 1/24 (pow (sin phi1) 2)))) (+ 1/2 (* -1/2 (pow (sin phi1) 2)))))) (pow (sin phi1) 2))
(- 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))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* 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)))))))))
(* 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))))))))
(* 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)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* 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)))))))))
(- 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))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* 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)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(* 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))))))))
(* delta (* (cos theta) (sin phi1)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos theta) (sin phi1)))) (* (cos theta) (sin phi1))))
(* delta (+ (* (cos theta) (sin phi1)) (* (pow delta 2) (+ (* -1/6 (* (cos theta) (sin phi1))) (* 1/120 (* (pow delta 2) (* (cos theta) (sin phi1))))))))
(* delta (+ (* (cos theta) (sin phi1)) (* (pow delta 2) (+ (* -1/6 (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos theta) (sin phi1)))) (* 1/120 (* (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))
(* 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))))))))
(* -1/6 (sin theta))
(+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta))))
(+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta))))
(+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta))))
(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))
(- 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))
(sin phi1)
(+ (sin phi1) (* -1/2 (* (pow delta 2) (sin phi1))))
(+ (sin phi1) (* (pow delta 2) (+ (* -1/2 (sin phi1)) (* 1/24 (* (pow delta 2) (sin phi1))))))
(+ (sin phi1) (* (pow delta 2) (+ (* -1/2 (sin phi1)) (* (pow delta 2) (+ (* -1/720 (* (pow delta 2) (sin phi1))) (* 1/24 (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))))))
(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) (* (cos delta) (pow (sin phi1) 2)))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (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))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* 1/120 (* (pow delta 5) (sin theta)))
(* (pow delta 5) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (* 1/120 (sin theta))))
(* (pow delta 5) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (+ (* 1/120 (sin theta)) (/ (sin theta) (pow delta 4)))))
(* (pow delta 5) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (+ (* 1/120 (sin theta)) (/ (sin theta) (pow delta 4)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (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 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))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(- (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))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* 1/120 (* (pow delta 2) (sin theta)))
(* (pow delta 2) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (* 1/120 (sin theta))))
(* (pow delta 2) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (* 1/120 (sin theta))))
(* (pow delta 2) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (* 1/120 (sin theta))))
(* (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)))))
(- (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 delta) (sin phi1))
(* (cos delta) (sin phi1))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (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) (* (cos delta) (pow (sin phi1) 2)))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (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))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* 1/120 (* (pow delta 5) (sin theta)))
(* -1 (* (pow delta 5) (+ (* -1/120 (sin theta)) (* 1/6 (/ (sin theta) (pow delta 2))))))
(* -1 (* (pow delta 5) (+ (* -1 (/ (sin theta) (pow delta 4))) (+ (* -1/120 (sin theta)) (* 1/6 (/ (sin theta) (pow delta 2)))))))
(* -1 (* (pow delta 5) (+ (* -1 (/ (sin theta) (pow delta 4))) (+ (* -1/120 (sin theta)) (* 1/6 (/ (sin theta) (pow delta 2)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (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 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))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (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)))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(- (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))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* 1/120 (* (pow delta 2) (sin theta)))
(* (pow delta 2) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (* 1/120 (sin theta))))
(* (pow delta 2) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (* 1/120 (sin theta))))
(* (pow delta 2) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (* 1/120 (sin theta))))
(* (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)))))
(- (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 delta) (sin phi1))
(* (cos delta) (sin phi1))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (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))))

Outputs
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 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 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) 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 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) 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 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 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 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) 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 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) 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 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 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 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) 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 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) 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 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1)
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) 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 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (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 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (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 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) 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 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (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 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (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 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) 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 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (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 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (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 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)) 1)))
(.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)) 1)))
(.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)) 1)))
(.f64 (neg.f64 lambda1) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(fma.f64 (.f64 (.f64 theta theta) #s(literal 1/2 binary64)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(fma.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal -1/24 binary64) (.f64 theta theta) #s(literal 1/2 binary64))) (.f64 theta theta) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (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))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(fma.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (sin.f64 delta)) (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/720 binary64) (.f64 theta theta) #s(literal -1/24 binary64))) (.f64 theta theta))) (.f64 theta theta) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* theta (* (cos phi1) (sin delta)))
(.f64 (.f64 theta (cos.f64 phi1)) (sin.f64 delta))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1))) theta)
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(fma.f64 (pow.f64 theta #s(literal 3 binary64)) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal 1/120 binary64) (.f64 theta theta) #s(literal -1/6 binary64))) (.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 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)))))))))
(.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (pow.f64 theta #s(literal 4 binary64)) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 binary64))))) theta)
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (sin.f64 delta)) theta)
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(fma.f64 (pow.f64 theta #s(literal 3 binary64)) (.f64 (sin.f64 delta) (fma.f64 #s(literal 1/120 binary64) (.f64 theta theta) #s(literal -1/6 binary64))) (*.f64 theta (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 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (sin.f64 delta) (.f64 (pow.f64 theta #s(literal 4 binary64)) (.f64 (sin.f64 delta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 binary64))))) theta)
(* theta (+ delta (* (pow delta 3) (- (* 1/120 (pow delta 2)) 1/6))))
(.f64 (fma.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (pow.f64 delta #s(literal 3 binary64)) delta) theta)
(* theta (+ delta (+ (* (pow delta 3) (- (* 1/120 (pow delta 2)) 1/6)) (* (pow theta 2) (+ (* -1/6 delta) (* -1/6 (* (pow delta 3) (- (* 1/120 (pow delta 2)) 1/6))))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/6 binary64) (fma.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (pow.f64 delta #s(literal 3 binary64)) delta)) theta) theta (fma.f64 (fma.f64 (*.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (pow.f64 delta #s(literal 3 binary64)) delta)) theta)
(* theta (+ delta (+ (* (pow delta 3) (- (* 1/120 (pow delta 2)) 1/6)) (* (pow theta 2) (+ (* -1/6 delta) (+ (* -1/6 (* (pow delta 3) (- (* 1/120 (pow delta 2)) 1/6))) (* (pow theta 2) (+ (* 1/120 delta) (* 1/120 (* (pow delta 3) (- (* 1/120 (pow delta 2)) 1/6)))))))))))
(.f64 (fma.f64 (fma.f64 (.f64 (.f64 #s(literal 1/120 binary64) (fma.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (pow.f64 delta #s(literal 3 binary64)) delta)) theta) theta (.f64 #s(literal -1/6 binary64) (fma.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (pow.f64 delta #s(literal 3 binary64)) delta))) (.f64 theta theta) (fma.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (pow.f64 delta #s(literal 3 binary64)) delta)) theta)
(* theta (+ delta (+ (* (pow delta 3) (- (* 1/120 (pow delta 2)) 1/6)) (* (pow theta 2) (+ (* -1/6 delta) (+ (* -1/6 (* (pow delta 3) (- (* 1/120 (pow delta 2)) 1/6))) (* (pow theta 2) (+ (* 1/120 delta) (+ (* 1/120 (* (pow delta 3) (- (* 1/120 (pow delta 2)) 1/6))) (* (pow theta 2) (+ (* -1/5040 delta) (* -1/5040 (* (pow delta 3) (- (* 1/120 (pow delta 2)) 1/6))))))))))))))
(.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 (.f64 #s(literal -1/5040 binary64) (fma.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (pow.f64 delta #s(literal 3 binary64)) delta)) theta) theta (.f64 #s(literal 1/120 binary64) (fma.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (pow.f64 delta #s(literal 3 binary64)) delta))) (.f64 theta theta) (.f64 #s(literal -1/6 binary64) (fma.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (pow.f64 delta #s(literal 3 binary64)) delta))) (.f64 theta theta) (fma.f64 (fma.f64 (*.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (pow.f64 delta #s(literal 3 binary64)) delta)) theta)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* theta (* (cos phi1) (sin delta)))
(.f64 (.f64 theta (cos.f64 phi1)) (sin.f64 delta))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1))) theta)
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(fma.f64 (pow.f64 theta #s(literal 3 binary64)) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal 1/120 binary64) (.f64 theta theta) #s(literal -1/6 binary64))) (.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 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)))))))))
(.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (pow.f64 theta #s(literal 4 binary64)) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 binary64))))) theta)
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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)))))
(fma.f64 (.f64 (.f64 theta theta) #s(literal 1/2 binary64)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal -1/24 binary64) (.f64 theta theta) #s(literal 1/2 binary64))) (.f64 theta theta) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (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 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (sin.f64 delta)) (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/720 binary64) (.f64 theta theta) #s(literal -1/24 binary64))) (.f64 theta theta))) (.f64 theta theta) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* theta (* (cos phi1) (sin delta)))
(.f64 (.f64 theta (cos.f64 phi1)) (sin.f64 delta))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1))) theta)
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(fma.f64 (pow.f64 theta #s(literal 3 binary64)) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal 1/120 binary64) (.f64 theta theta) #s(literal -1/6 binary64))) (.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 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)))))))))
(.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (pow.f64 theta #s(literal 4 binary64)) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 binary64))))) theta)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (sin.f64 delta)) theta)
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(fma.f64 (pow.f64 theta #s(literal 3 binary64)) (.f64 (sin.f64 delta) (fma.f64 #s(literal 1/120 binary64) (.f64 theta theta) #s(literal -1/6 binary64))) (*.f64 theta (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 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (sin.f64 delta) (.f64 (pow.f64 theta #s(literal 4 binary64)) (.f64 (sin.f64 delta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 binary64))))) theta)
(* (sin delta) (sin phi1))
(*.f64 (sin.f64 phi1) (sin.f64 delta))
(+ (* -1/2 (* (pow theta 2) (* (sin delta) (sin phi1)))) (* (sin delta) (sin phi1)))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 theta theta) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(+ (* (sin delta) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (sin phi1))) (* 1/24 (* (pow theta 2) (* (sin delta) (sin phi1)))))))
(fma.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (fma.f64 #s(literal 1/24 binary64) (.f64 theta theta) #s(literal -1/2 binary64))) (.f64 theta theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(+ (* (sin delta) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (sin delta) (sin phi1)))) (* 1/24 (* (sin delta) (sin phi1))))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 theta theta) #s(literal 1 binary64)) (.f64 (sin.f64 phi1) (sin.f64 delta)) (.f64 (pow.f64 theta #s(literal 4 binary64)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (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) (sin delta)))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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)))))
(fma.f64 (.f64 (.f64 theta theta) #s(literal 1/2 binary64)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal -1/24 binary64) (.f64 theta theta) #s(literal 1/2 binary64))) (.f64 theta theta) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (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 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (sin.f64 delta)) (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/720 binary64) (.f64 theta theta) #s(literal -1/24 binary64))) (.f64 theta theta))) (.f64 theta theta) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (sin.f64 delta)) theta)
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(fma.f64 (pow.f64 theta #s(literal 3 binary64)) (.f64 (sin.f64 delta) (fma.f64 #s(literal 1/120 binary64) (.f64 theta theta) #s(literal -1/6 binary64))) (*.f64 theta (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 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (sin.f64 delta) (.f64 (pow.f64 theta #s(literal 4 binary64)) (.f64 (sin.f64 delta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 binary64))))) theta)
(* theta (- (* 1/120 (pow delta 2)) 1/6))
(.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) theta)
(* theta (- (+ (* -1/6 (* (pow theta 2) (- (* 1/120 (pow delta 2)) 1/6))) (* 1/120 (pow delta 2))) 1/6))
(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) theta)
(* theta (- (+ (* 1/120 (pow delta 2)) (* (pow theta 2) (+ (* -1/6 (- (* 1/120 (pow delta 2)) 1/6)) (* 1/120 (* (pow theta 2) (- (* 1/120 (pow delta 2)) 1/6)))))) 1/6))
(.f64 (fma.f64 (.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (fma.f64 #s(literal 1/120 binary64) (.f64 theta theta) #s(literal -1/6 binary64))) (.f64 theta theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) theta)
(* theta (- (+ (* 1/120 (pow delta 2)) (* (pow theta 2) (+ (* -1/6 (- (* 1/120 (pow delta 2)) 1/6)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (- (* 1/120 (pow delta 2)) 1/6))) (* 1/120 (- (* 1/120 (pow delta 2)) 1/6))))))) 1/6))
(.f64 (fma.f64 (fma.f64 (.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 theta theta) #s(literal 1/120 binary64))) (.f64 theta theta) (.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) #s(literal -1/6 binary64))) (.f64 theta theta) (fma.f64 (*.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) theta)
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.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 (.f64 (.f64 theta theta) #s(literal -1/2 binary64)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (.f64 theta theta) #s(literal -1/2 binary64))) (.f64 theta theta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.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)))))))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (sin.f64 delta)) (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (.f64 theta theta) #s(literal 1/24 binary64))) (.f64 theta theta))) (.f64 theta theta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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)))))
(fma.f64 (.f64 (.f64 theta theta) #s(literal 1/2 binary64)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal -1/24 binary64) (.f64 theta theta) #s(literal 1/2 binary64))) (.f64 theta theta) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (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 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (sin.f64 delta)) (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/720 binary64) (.f64 theta theta) #s(literal -1/24 binary64))) (.f64 theta theta))) (.f64 theta theta) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(fma.f64 (.f64 (.f64 theta theta) #s(literal 1/2 binary64)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (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 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal -1/24 binary64) (.f64 theta theta) #s(literal 1/2 binary64))) (.f64 theta theta) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))
(+ (cos delta) (+ (* -1 (* (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/24 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))))
(fma.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (sin.f64 delta)) (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/720 binary64) (.f64 theta theta) #s(literal -1/24 binary64))) (.f64 theta theta))) (.f64 theta theta) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(fma.f64 (.f64 (.f64 theta theta) #s(literal -1/2 binary64)) (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.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 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (.f64 theta theta) #s(literal -1/2 binary64))) (.f64 theta theta) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.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 (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 delta)) (cos.f64 phi1) (.f64 (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (.f64 theta theta) #s(literal 1/24 binary64))) (.f64 theta theta))) (.f64 theta theta) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(+ (* delta (sin theta)) (* (pow delta 3) (* (sin theta) (- (* 1/120 (pow delta 2)) 1/6))))
(fma.f64 (.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (sin.f64 theta)) (pow.f64 delta #s(literal 3 binary64)) (*.f64 (sin.f64 theta) delta))
(+ (* delta (sin theta)) (* (pow delta 3) (* (sin theta) (- (* 1/120 (pow delta 2)) 1/6))))
(fma.f64 (.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (sin.f64 theta)) (pow.f64 delta #s(literal 3 binary64)) (*.f64 (sin.f64 theta) delta))
(+ (* delta (sin theta)) (* (pow delta 3) (* (sin theta) (- (* 1/120 (pow delta 2)) 1/6))))
(fma.f64 (.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (sin.f64 theta)) (pow.f64 delta #s(literal 3 binary64)) (*.f64 (sin.f64 theta) delta))
(+ (* delta (sin theta)) (* (pow delta 3) (* (sin theta) (- (* 1/120 (pow delta 2)) 1/6))))
(fma.f64 (.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (sin.f64 theta)) (pow.f64 delta #s(literal 3 binary64)) (*.f64 (sin.f64 theta) 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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (cos theta) (* (sin delta) (sin phi1)))
(.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(* (cos theta) (* (sin delta) (sin phi1)))
(.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(* (cos theta) (* (sin delta) (sin phi1)))
(.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(* (cos theta) (* (sin delta) (sin phi1)))
(.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin theta) (- (* 1/120 (pow delta 2)) 1/6))
(.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (sin.f64 theta))
(* (sin theta) (- (* 1/120 (pow delta 2)) 1/6))
(.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (sin.f64 theta))
(* (sin theta) (- (* 1/120 (pow delta 2)) 1/6))
(.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (sin.f64 theta))
(* (sin theta) (- (* 1/120 (pow delta 2)) 1/6))
(.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (sin.f64 theta))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(+ (* delta (sin theta)) (* (pow delta 3) (* (sin theta) (- (* 1/120 (pow delta 2)) 1/6))))
(fma.f64 (.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (sin.f64 theta)) (pow.f64 delta #s(literal 3 binary64)) (*.f64 (sin.f64 theta) delta))
(+ (* delta (sin theta)) (* (pow delta 3) (* (sin theta) (- (* 1/120 (pow delta 2)) 1/6))))
(fma.f64 (.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (sin.f64 theta)) (pow.f64 delta #s(literal 3 binary64)) (*.f64 (sin.f64 theta) delta))
(+ (* delta (sin theta)) (* (pow delta 3) (* (sin theta) (- (* 1/120 (pow delta 2)) 1/6))))
(fma.f64 (.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (sin.f64 theta)) (pow.f64 delta #s(literal 3 binary64)) (*.f64 (sin.f64 theta) delta))
(+ (* delta (sin theta)) (* (pow delta 3) (* (sin theta) (- (* 1/120 (pow delta 2)) 1/6))))
(fma.f64 (.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (sin.f64 theta)) (pow.f64 delta #s(literal 3 binary64)) (*.f64 (sin.f64 theta) 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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (cos theta) (* (sin delta) (sin phi1)))
(.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(* (cos theta) (* (sin delta) (sin phi1)))
(.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(* (cos theta) (* (sin delta) (sin phi1)))
(.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(* (cos theta) (* (sin delta) (sin phi1)))
(.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin theta) (- (* 1/120 (pow delta 2)) 1/6))
(.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (sin.f64 theta))
(* (sin theta) (- (* 1/120 (pow delta 2)) 1/6))
(.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (sin.f64 theta))
(* (sin theta) (- (* 1/120 (pow delta 2)) 1/6))
(.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (sin.f64 theta))
(* (sin theta) (- (* 1/120 (pow delta 2)) 1/6))
(.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (sin.f64 theta))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* (pow phi1 2) (cos delta))))
(*.f64 (fma.f64 (neg.f64 phi1) 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 (cos.f64 delta) (fma.f64 #s(literal 1/3 binary64) (.f64 phi1 phi1) #s(literal -1 binary64))) (*.f64 phi1 phi1) (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 (.f64 (.f64 (cos.f64 delta) (fma.f64 #s(literal -2/45 binary64) (.f64 phi1 phi1) #s(literal 1/3 binary64))) (.f64 phi1 phi1)) (cos.f64 delta)) (*.f64 phi1 phi1) (cos.f64 delta))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) 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 (fma.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta) (.f64 (fma.f64 (.f64 (*.f64 phi1 (sin.f64 delta)) (cos.f64 theta)) #s(literal 2/3 binary64) (neg.f64 (cos.f64 delta))) phi1)) phi1 (cos.f64 delta))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(+ (* (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1) #s(literal -1/2 binary64))) (.f64 phi1 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(+ (* (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 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 theta) (sin.f64 delta)) (.f64 (pow.f64 phi1 #s(literal 4 binary64)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(+ (* (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1) #s(literal -1/2 binary64))) (.f64 phi1 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(+ (* (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 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 theta) (sin.f64 delta)) (.f64 (pow.f64 phi1 #s(literal 4 binary64)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)))))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) 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 (fma.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta) (.f64 (fma.f64 (.f64 (*.f64 phi1 (sin.f64 delta)) (cos.f64 theta)) #s(literal 2/3 binary64) (neg.f64 (cos.f64 delta))) phi1)) 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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(+ (* (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1) #s(literal -1/2 binary64))) (.f64 phi1 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(+ (* (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 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 theta) (sin.f64 delta)) (.f64 (pow.f64 phi1 #s(literal 4 binary64)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(pow phi1 2)
(*.f64 phi1 phi1)
(* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))
(fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal -1/3 binary64) (*.f64 phi1 phi1))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))
(fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) (fma.f64 #s(literal 2/45 binary64) (.f64 phi1 phi1) #s(literal -1/3 binary64)) (.f64 phi1 phi1))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))
(fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) (fma.f64 (fma.f64 #s(literal -1/315 binary64) (.f64 phi1 phi1) #s(literal 2/45 binary64)) (.f64 phi1 phi1) #s(literal -1/3 binary64)) (*.f64 phi1 phi1))
(* phi1 (* (cos theta) (sin delta)))
(.f64 (.f64 phi1 (sin.f64 delta)) (cos.f64 theta))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* (cos theta) (sin delta))))
(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (cos.f64 theta) (sin.f64 delta))) phi1)
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/6 (* (cos theta) (sin delta))) (* 1/120 (* (pow phi1 2) (* (cos theta) (sin delta))))))))
(fma.f64 (pow.f64 phi1 #s(literal 3 binary64)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal 1/120 binary64) (.f64 phi1 phi1) #s(literal -1/6 binary64))) (.f64 (*.f64 phi1 (sin.f64 delta)) (cos.f64 theta)))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* 1/120 (* (cos theta) (sin delta)))))))))
(.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (pow.f64 phi1 #s(literal 4 binary64)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1) #s(literal 1/120 binary64))))) phi1)
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) 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 (fma.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta) (.f64 (fma.f64 (.f64 (*.f64 phi1 (sin.f64 delta)) (cos.f64 theta)) #s(literal 2/3 binary64) (neg.f64 (cos.f64 delta))) phi1)) phi1 (cos.f64 delta))
(* phi1 (* (cos theta) (sin delta)))
(.f64 (.f64 phi1 (sin.f64 delta)) (cos.f64 theta))
(* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))
(.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))
(.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) #s(literal -2/3 binary64))) phi1 (cos.f64 delta)) phi1 (.f64 (cos.f64 theta) (sin.f64 delta))) phi1)
(* 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 (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/3 binary64) phi1) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) #s(literal -2/3 binary64)))) phi1 (cos.f64 delta)) phi1 (*.f64 (cos.f64 theta) (sin.f64 delta))) phi1)
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) 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 (fma.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta) (.f64 (fma.f64 (.f64 (*.f64 phi1 (sin.f64 delta)) (cos.f64 theta)) #s(literal 2/3 binary64) (neg.f64 (cos.f64 delta))) phi1)) phi1 (cos.f64 delta))
(* phi1 (cos delta))
(*.f64 (cos.f64 delta) phi1)
(* phi1 (+ (cos delta) (* -1/6 (* (pow phi1 2) (cos delta)))))
(.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta)) phi1)
(* phi1 (+ (cos delta) (* (pow phi1 2) (+ (* -1/6 (cos delta)) (* 1/120 (* (pow phi1 2) (cos delta)))))))
(fma.f64 (pow.f64 phi1 #s(literal 3 binary64)) (.f64 (cos.f64 delta) (fma.f64 #s(literal 1/120 binary64) (.f64 phi1 phi1) #s(literal -1/6 binary64))) (*.f64 (cos.f64 delta) phi1))
(* phi1 (+ (cos delta) (* (pow phi1 2) (+ (* -1/6 (cos delta)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (cos delta))) (* 1/120 (cos delta))))))))
(.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 delta) (.f64 (pow.f64 phi1 #s(literal 4 binary64)) (.f64 (cos.f64 delta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1) #s(literal 1/120 binary64))))) phi1)
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 delta))
(+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) phi1 (cos.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 (fma.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta) (.f64 (fma.f64 (.f64 (*.f64 phi1 (sin.f64 delta)) (cos.f64 theta)) #s(literal 2/3 binary64) (neg.f64 (cos.f64 delta))) phi1)) phi1 (cos.f64 delta))
(* (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 (cos.f64 delta) phi1))
(+ (* phi1 (+ (cos delta) (* -1/2 (* phi1 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta)))
(fma.f64 (fma.f64 (.f64 phi1 (.f64 #s(literal -1/2 binary64) (cos.f64 theta))) (sin.f64 delta) (cos.f64 delta)) phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))
(+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* phi1 (cos delta))))))) (* (cos theta) (sin delta)))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi1) (cos.f64 delta) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 theta)) (sin.f64 delta))) phi1 (cos.f64 delta)) phi1 (.f64 (cos.f64 theta) (sin.f64 delta)))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (cos.f64 delta)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (cos.f64 delta)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (cos.f64 delta)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (cos.f64 delta)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(* (cos theta) (* (sin delta) (sin phi1)))
(.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(* (cos theta) (* (sin delta) (sin phi1)))
(.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(* (cos theta) (* (sin delta) (sin phi1)))
(.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(* (cos theta) (* (sin delta) (sin phi1)))
(.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(* (cos delta) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(* (cos delta) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(* (cos delta) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(* (cos delta) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (cos.f64 delta)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (cos.f64 delta)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (cos.f64 delta)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (cos.f64 delta)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(* (cos theta) (* (sin delta) (sin phi1)))
(.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(* (cos theta) (* (sin delta) (sin phi1)))
(.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(* (cos theta) (* (sin delta) (sin phi1)))
(.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(* (cos theta) (* (sin delta) (sin phi1)))
(.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(* (cos delta) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(* (cos delta) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(* (cos delta) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(* (cos delta) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(- 1 (pow (sin phi1) 2))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(- (+ 1 (* -1 (* (pow delta 2) (+ 1/2 (* -1/2 (pow (sin phi1) 2)))))) (pow (sin phi1) 2))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (.f64 delta delta) (.f64 (cos.f64 phi1) (cos.f64 phi1)))
(- (+ 1 (* (pow delta 2) (- (* (pow delta 2) (- 1/24 (* 1/24 (pow (sin phi1) 2)))) (+ 1/2 (* -1/2 (pow (sin phi1) 2)))))) (pow (sin phi1) 2))
(fma.f64 (fma.f64 (.f64 (fma.f64 #s(literal -1/24 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/24 binary64)) delta) delta (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (.f64 delta delta) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))
(- (+ 1 (* (pow delta 2) (- (* (pow delta 2) (- (+ 1/24 (* -1 (* (pow delta 2) (+ 1/720 (* -1/720 (pow (sin phi1) 2)))))) (* 1/24 (pow (sin phi1) 2)))) (+ 1/2 (* -1/2 (pow (sin phi1) 2)))))) (pow (sin phi1) 2))
(fma.f64 (fma.f64 (fma.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/720 binary64)) delta) (neg.f64 delta) (fma.f64 #s(literal -1/24 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/24 binary64))) (.f64 delta delta) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (.f64 delta delta) (.f64 (cos.f64 phi1) (cos.f64 phi1)))
(- 1 (pow (sin phi1) 2))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 (.f64 (neg.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (cos.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 (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64)) delta) (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta (.f64 (cos.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 (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 theta) (.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) (.f64 delta (cos.f64 phi1))) (.f64 (cos.f64 theta) (sin.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64))) delta)) delta (.f64 (cos.f64 phi1) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* delta (* (cos phi1) (sin theta)))
(.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (.f64 (sin.f64 theta) (cos.f64 phi1))) delta)
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(fma.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (pow.f64 delta #s(literal 3 binary64)) (.f64 (*.f64 delta (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 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (.f64 (sin.f64 theta) (cos.f64 phi1)) (.f64 (pow.f64 delta #s(literal 4 binary64)) (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 (*.f64 #s(literal -1/5040 binary64) delta) delta #s(literal 1/120 binary64))))) delta)
(* delta (sin theta))
(*.f64 (sin.f64 theta) delta)
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (sin.f64 theta)) delta)
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(fma.f64 (.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (sin.f64 theta)) (pow.f64 delta #s(literal 3 binary64)) (*.f64 (sin.f64 theta) 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 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (sin.f64 theta) (.f64 (pow.f64 delta #s(literal 4 binary64)) (.f64 (sin.f64 theta) (fma.f64 (*.f64 #s(literal -1/5040 binary64) delta) delta #s(literal 1/120 binary64))))) delta)
(* delta (sin theta))
(*.f64 (sin.f64 theta) delta)
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (sin.f64 theta)) delta)
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(fma.f64 (.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (sin.f64 theta)) (pow.f64 delta #s(literal 3 binary64)) (*.f64 (sin.f64 theta) delta))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(fma.f64 (.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (sin.f64 theta)) (pow.f64 delta #s(literal 3 binary64)) (*.f64 (sin.f64 theta) 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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* delta (* (cos phi1) (sin theta)))
(.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (.f64 (sin.f64 theta) (cos.f64 phi1))) delta)
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(fma.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (pow.f64 delta #s(literal 3 binary64)) (.f64 (*.f64 delta (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 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (.f64 (sin.f64 theta) (cos.f64 phi1)) (.f64 (pow.f64 delta #s(literal 4 binary64)) (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 (*.f64 #s(literal -1/5040 binary64) delta) delta #s(literal 1/120 binary64))))) delta)
(- 1 (pow (sin phi1) 2))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 (.f64 (neg.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (cos.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 (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64)) delta) (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta (.f64 (cos.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 (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 theta) (.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) (.f64 delta (cos.f64 phi1))) (.f64 (cos.f64 theta) (sin.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64))) delta)) delta (.f64 (cos.f64 phi1) (cos.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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* delta (* (cos phi1) (sin theta)))
(.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (.f64 (sin.f64 theta) (cos.f64 phi1))) delta)
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(fma.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (pow.f64 delta #s(literal 3 binary64)) (.f64 (*.f64 delta (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 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (.f64 (sin.f64 theta) (cos.f64 phi1)) (.f64 (pow.f64 delta #s(literal 4 binary64)) (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 (*.f64 #s(literal -1/5040 binary64) delta) delta #s(literal 1/120 binary64))))) delta)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* delta (sin theta))
(*.f64 (sin.f64 theta) delta)
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (sin.f64 theta)) delta)
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(fma.f64 (.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (sin.f64 theta)) (pow.f64 delta #s(literal 3 binary64)) (*.f64 (sin.f64 theta) 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 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (sin.f64 theta) (.f64 (pow.f64 delta #s(literal 4 binary64)) (.f64 (sin.f64 theta) (fma.f64 (*.f64 #s(literal -1/5040 binary64) delta) delta #s(literal 1/120 binary64))))) delta)
(* delta (* (cos theta) (sin phi1)))
(.f64 (.f64 delta (cos.f64 theta)) (sin.f64 phi1))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos theta) (sin phi1)))) (* (cos theta) (sin phi1))))
(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (.f64 (cos.f64 theta) (sin.f64 phi1))) delta)
(* delta (+ (* (cos theta) (sin phi1)) (* (pow delta 2) (+ (* -1/6 (* (cos theta) (sin phi1))) (* 1/120 (* (pow delta 2) (* (cos theta) (sin phi1))))))))
(fma.f64 (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (pow.f64 delta #s(literal 3 binary64)) (.f64 (*.f64 delta (cos.f64 theta)) (sin.f64 phi1)))
(* delta (+ (* (cos theta) (sin phi1)) (* (pow delta 2) (+ (* -1/6 (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos theta) (sin phi1)))) (* 1/120 (* (cos theta) (sin phi1)))))))))
(.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (.f64 (cos.f64 theta) (sin.f64 phi1)) (.f64 (pow.f64 delta #s(literal 4 binary64)) (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (fma.f64 (*.f64 #s(literal -1/5040 binary64) delta) delta #s(literal 1/120 binary64))))) delta)
(- 1 (pow (sin phi1) 2))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 (.f64 (neg.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (cos.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 (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64)) delta) (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta (.f64 (cos.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 (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 theta) (.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) (.f64 delta (cos.f64 phi1))) (.f64 (cos.f64 theta) (sin.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64))) delta)) delta (.f64 (cos.f64 phi1) (cos.f64 phi1)))
(* delta (sin theta))
(*.f64 (sin.f64 theta) delta)
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (sin.f64 theta)) delta)
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(fma.f64 (.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (sin.f64 theta)) (pow.f64 delta #s(literal 3 binary64)) (*.f64 (sin.f64 theta) 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 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (sin.f64 theta) (.f64 (pow.f64 delta #s(literal 4 binary64)) (.f64 (sin.f64 theta) (fma.f64 (*.f64 #s(literal -1/5040 binary64) delta) delta #s(literal 1/120 binary64))))) delta)
(* -1/6 (sin theta))
(*.f64 #s(literal -1/6 binary64) (sin.f64 theta))
(+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta))))
(.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (sin.f64 theta))
(+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta))))
(.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (sin.f64 theta))
(+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta))))
(.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (sin.f64 theta))
(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 (.f64 delta (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 (.f64 delta #s(literal -1/2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta (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 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 phi1)) (cos.f64 theta) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) (.f64 delta (cos.f64 phi1))) (.f64 (cos.f64 theta) (sin.f64 phi1)) (.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) delta)) delta (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 (.f64 (neg.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (cos.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 (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64)) delta) (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta (.f64 (cos.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 (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 theta) (.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) (.f64 delta (cos.f64 phi1))) (.f64 (cos.f64 theta) (sin.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64))) delta)) delta (.f64 (cos.f64 phi1) (cos.f64 phi1)))
(sin phi1)
(sin.f64 phi1)
(+ (sin phi1) (* -1/2 (* (pow delta 2) (sin phi1))))
(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 binary64)) (sin.f64 phi1))
(+ (sin phi1) (* (pow delta 2) (+ (* -1/2 (sin phi1)) (* 1/24 (* (pow delta 2) (sin phi1))))))
(fma.f64 (.f64 (sin.f64 phi1) (fma.f64 #s(literal 1/24 binary64) (.f64 delta delta) #s(literal -1/2 binary64))) (*.f64 delta delta) (sin.f64 phi1))
(+ (sin phi1) (* (pow delta 2) (+ (* -1/2 (sin phi1)) (* (pow delta 2) (+ (* -1/720 (* (pow delta 2) (sin phi1))) (* 1/24 (sin phi1)))))))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 binary64)) (sin.f64 phi1) (.f64 (pow.f64 delta #s(literal 4 binary64)) (.f64 (sin.f64 phi1) (fma.f64 #s(literal -1/720 binary64) (.f64 delta delta) #s(literal 1/24 binary64)))))
(+ 1 (* -1 (pow (sin phi1) 2)))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(+ 1 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* -1 (pow (sin phi1) 2))))
(fma.f64 (.f64 (neg.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (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 (-.f64 (.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64)) delta) (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta (.f64 (cos.f64 phi1) (cos.f64 phi1)))
(+ 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 (fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 theta) (.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) (.f64 delta (cos.f64 phi1))) (.f64 (cos.f64 theta) (sin.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64))) delta)) delta (.f64 (cos.f64 phi1) (cos.f64 phi1)))
(sin phi1)
(sin.f64 phi1)
(+ (sin phi1) (* delta (* (cos phi1) (cos theta))))
(fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))
(+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))))
(fma.f64 (fma.f64 (.f64 delta #s(literal -1/2 binary64)) (sin.f64 phi1) (.f64 (cos.f64 theta) (cos.f64 phi1))) delta (sin.f64 phi1))
(+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (* delta (* (cos phi1) (cos theta)))))) (* (cos phi1) (cos theta)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) (.f64 delta (cos.f64 phi1))) (cos.f64 theta) (.f64 #s(literal -1/2 binary64) (sin.f64 phi1))) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) delta (sin.f64 phi1))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (cos.f64 delta)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (cos.f64 delta)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (cos.f64 delta)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (cos.f64 delta)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* 1/120 (* (pow delta 5) (sin theta)))
(.f64 (.f64 (pow.f64 delta #s(literal 5 binary64)) #s(literal 1/120 binary64)) (sin.f64 theta))
(* (pow delta 5) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (* 1/120 (sin theta))))
(.f64 (fma.f64 (/.f64 #s(literal -1/6 binary64) delta) (/.f64 (sin.f64 theta) delta) (.f64 #s(literal 1/120 binary64) (sin.f64 theta))) (pow.f64 delta #s(literal 5 binary64)))
(* (pow delta 5) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (+ (* 1/120 (sin theta)) (/ (sin theta) (pow delta 4)))))
(*.f64 (fma.f64 (/.f64 #s(literal -1/6 binary64) delta) (/.f64 (sin.f64 theta) delta) (fma.f64 #s(literal 1/120 binary64) (sin.f64 theta) (/.f64 (sin.f64 theta) (pow.f64 delta #s(literal 4 binary64))))) (pow.f64 delta #s(literal 5 binary64)))
(* (pow delta 5) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (+ (* 1/120 (sin theta)) (/ (sin theta) (pow delta 4)))))
(*.f64 (fma.f64 (/.f64 #s(literal -1/6 binary64) delta) (/.f64 (sin.f64 theta) delta) (fma.f64 #s(literal 1/120 binary64) (sin.f64 theta) (/.f64 (sin.f64 theta) (pow.f64 delta #s(literal 4 binary64))))) (pow.f64 delta #s(literal 5 binary64)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (cos theta) (* (sin delta) (sin phi1)))
(.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(* (cos theta) (* (sin delta) (sin phi1)))
(.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(* (cos theta) (* (sin delta) (sin phi1)))
(.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(* (cos theta) (* (sin delta) (sin phi1)))
(.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* 1/120 (* (pow delta 2) (sin theta)))
(.f64 (.f64 (*.f64 (sin.f64 theta) delta) delta) #s(literal 1/120 binary64))
(* (pow delta 2) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (* 1/120 (sin theta))))
(.f64 (fma.f64 (/.f64 #s(literal -1/6 binary64) delta) (/.f64 (sin.f64 theta) delta) (.f64 #s(literal 1/120 binary64) (sin.f64 theta))) (*.f64 delta delta))
(* (pow delta 2) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (* 1/120 (sin theta))))
(.f64 (fma.f64 (/.f64 #s(literal -1/6 binary64) delta) (/.f64 (sin.f64 theta) delta) (.f64 #s(literal 1/120 binary64) (sin.f64 theta))) (*.f64 delta delta))
(* (pow delta 2) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (* 1/120 (sin theta))))
(.f64 (fma.f64 (/.f64 #s(literal -1/6 binary64) delta) (/.f64 (sin.f64 theta) delta) (.f64 #s(literal 1/120 binary64) (sin.f64 theta))) (*.f64 delta delta))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(* (cos delta) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(* (cos delta) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(* (cos delta) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(* (cos delta) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (cos.f64 delta)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (cos.f64 delta)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (cos.f64 delta)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (pow (sin phi1) 2)))
(fma.f64 (neg.f64 (cos.f64 delta)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* 1/120 (* (pow delta 5) (sin theta)))
(.f64 (.f64 (pow.f64 delta #s(literal 5 binary64)) #s(literal 1/120 binary64)) (sin.f64 theta))
(* -1 (* (pow delta 5) (+ (* -1/120 (sin theta)) (* 1/6 (/ (sin theta) (pow delta 2))))))
(.f64 (fma.f64 (/.f64 #s(literal -1/6 binary64) delta) (/.f64 (sin.f64 theta) delta) (.f64 #s(literal 1/120 binary64) (sin.f64 theta))) (pow.f64 delta #s(literal 5 binary64)))
(* -1 (* (pow delta 5) (+ (* -1 (/ (sin theta) (pow delta 4))) (+ (* -1/120 (sin theta)) (* 1/6 (/ (sin theta) (pow delta 2)))))))
(*.f64 (fma.f64 (/.f64 #s(literal -1/6 binary64) delta) (/.f64 (sin.f64 theta) delta) (fma.f64 #s(literal 1/120 binary64) (sin.f64 theta) (/.f64 (sin.f64 theta) (pow.f64 delta #s(literal 4 binary64))))) (pow.f64 delta #s(literal 5 binary64)))
(* -1 (* (pow delta 5) (+ (* -1 (/ (sin theta) (pow delta 4))) (+ (* -1/120 (sin theta)) (* 1/6 (/ (sin theta) (pow delta 2)))))))
(*.f64 (fma.f64 (/.f64 #s(literal -1/6 binary64) delta) (/.f64 (sin.f64 theta) delta) (fma.f64 #s(literal 1/120 binary64) (sin.f64 theta) (/.f64 (sin.f64 theta) (pow.f64 delta #s(literal 4 binary64))))) (pow.f64 delta #s(literal 5 binary64)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (cos theta) (* (sin delta) (sin phi1)))
(.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(* (cos theta) (* (sin delta) (sin phi1)))
(.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(* (cos theta) (* (sin delta) (sin phi1)))
(.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(* (cos theta) (* (sin delta) (sin phi1)))
(.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(* 1/120 (* (pow delta 2) (sin theta)))
(.f64 (.f64 (*.f64 (sin.f64 theta) delta) delta) #s(literal 1/120 binary64))
(* (pow delta 2) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (* 1/120 (sin theta))))
(.f64 (fma.f64 (/.f64 #s(literal -1/6 binary64) delta) (/.f64 (sin.f64 theta) delta) (.f64 #s(literal 1/120 binary64) (sin.f64 theta))) (*.f64 delta delta))
(* (pow delta 2) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (* 1/120 (sin theta))))
(.f64 (fma.f64 (/.f64 #s(literal -1/6 binary64) delta) (/.f64 (sin.f64 theta) delta) (.f64 #s(literal 1/120 binary64) (sin.f64 theta))) (*.f64 delta delta))
(* (pow delta 2) (+ (* -1/6 (/ (sin theta) (pow delta 2))) (* 1/120 (sin theta))))
(.f64 (fma.f64 (/.f64 #s(literal -1/6 binary64) delta) (/.f64 (sin.f64 theta) delta) (.f64 #s(literal 1/120 binary64) (sin.f64 theta))) (*.f64 delta delta))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(* (cos delta) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(* (cos delta) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(* (cos delta) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(* (cos delta) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))

rewrite174.0ms (1.1%)

Memory

27.4MiB live, 219.1MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	76	730
0	125	708
1	452	702
2	3125	702
0	8389	689

Stop Event

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

Counts

29 → 538

Calls

Call 1

Inputs
(-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1)
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))))
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))))
#s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))
(fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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))))
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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 theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(.f64 (sin.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 (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) delta)))
(.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)))
#s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1)))

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

eval282.0ms (1.8%)

Memory: 11.2MiB live, 403.9MiB allocated
Compiler: Compiled 63 628 to 3 734 computations (94.1% saved)

prune174.0ms (1.1%)

Memory

-37.4MiB live, 256.0MiB allocated

Pruning

66 alts after pruning (62 fresh and 4 done)

	Pruned	Kept	Total
New	1 734	24	1 758
Fresh	13	38	51
Picked	3	2	5
Done	0	2	2
Total	1 750	66	1 816

Accuracy

100.0%

Counts

1 816 → 66

Alt Table

Click to see full alt table

Status	Accuracy	Program
	54.7%	(/.f64 (-.f64 (pow.f64 (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(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (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))
	45.0%	(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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(literal 2 binary64)))))
	99.8%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
	77.9%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 binary64)) (sin.f64 phi1)))) (cos.f64 delta))) lambda1)
✓	92.8%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
	99.8%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (cos.f64 delta))) lambda1)
	80.2%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (fma.f64 (fma.f64 (.f64 delta #s(literal -1/2 binary64)) (sin.f64 phi1) (.f64 (cos.f64 theta) (cos.f64 phi1))) delta (sin.f64 phi1))) (cos.f64 delta))) lambda1)
	88.1%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 delta))) lambda1)
	91.7%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (sin.f64 phi1)) (cos.f64 delta))) lambda1)
	99.8%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (.f64 (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1)
	79.7%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(approx (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (.f64 (cos.f64 phi1) (cos.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1)
	88.9%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(approx (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (cos.f64 delta)) (.f64 (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1)
	94.2%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) lambda1)
	76.9%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))) lambda1)
	77.7%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta)) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))))) lambda1)
	92.8%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
	99.8%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
	91.6%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) lambda1)
	88.4%	(+.f64 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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)
	76.9%	(+.f64 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
	78.7%	(+.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
	88.3%	(+.f64 lambda1 (atan2.f64 (/.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #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 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (pow.f64 (pow.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #s(literal 1/2 binary64)) #s(literal 2 binary64))))
	76.9%	(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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) (cos.f64 phi1)))))
	88.3%	(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	70.5%	(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (.f64 delta (cos.f64 phi1))) (sin.f64 theta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	85.7%	(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (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))))
	88.3%	(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 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))))
	90.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)))) (pow.f64 (fma.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))) #s(literal -1 binary64)) (cos.f64 delta))))
✓	99.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
	91.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))))
	91.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (exp.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)))))))))
	81.4%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) #s(approx (pow (sin phi1) 2) (*.f64 phi1 phi1))))))))
	76.9%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) #s(approx (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))))
	88.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 #s(approx (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
	82.7%	(+.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)))))) #s(approx (* (sin phi1) (+ (* (* delta (cos theta)) (cos phi1)) (sin phi1))) (*.f64 (fma.f64 delta (cos.f64 phi1) (sin.f64 phi1)) (sin.f64 phi1)))))))
	50.9%	(+.f64 lambda1 (atan2.f64 (.f64 (exp.f64 (.f64 (log.f64 (.f64 (sin.f64 theta) (sin.f64 delta))) #s(literal 1 binary64))) (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 (sin.f64 theta) (fma.f64 delta (.f64 (.f64 #s(literal -1/6 binary64) delta) delta) 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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
	76.3%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
	67.0%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ ( (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
	76.0%	(+.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))))
	50.5%	(+.f64 lambda1 (atan2.f64 (exp.f64 (.f64 (neg.f64 (log.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 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))))
	50.9%	(+.f64 lambda1 (atan2.f64 (exp.f64 (.f64 (log.f64 (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
	70.5%	(+.f64 lambda1 (atan2.f64 #s(approx (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 delta (.f64 (.f64 delta delta) #s(literal -1/6 binary64)) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	74.5%	(+.f64 lambda1 (atan2.f64 #s(approx (/ 1 (/ (pow (sin theta) -1) (* (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))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	70.5%	(+.f64 lambda1 (atan2.f64 #s(approx (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	75.5%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) #s(approx (+ ( (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
	69.8%	(+.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))))
	74.2%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))))
	85.4%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx ( (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))))
	86.2%	(+.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))))))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)))))
	86.3%	(+.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))))))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))
	71.9%	(+.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))))))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
✓	85.7%	(+.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))))
	65.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta) (.f64 (fma.f64 (.f64 (*.f64 phi1 (sin.f64 delta)) (cos.f64 theta)) #s(literal 2/3 binary64) (neg.f64 (cos.f64 delta))) phi1)) phi1 (cos.f64 delta)))))
	73.2%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (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))))
	69.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (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))))
	71.0%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))))
	70.7%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 delta)))))
	74.9%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
	65.3%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.f64 theta (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) (cos.f64 phi1)))))
✓	74.4%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))))
	62.5%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) #s(approx (+ (* (pow delta 3) (* (sin theta) (+ (* (* delta delta) 1/120) -1/6))) (* (sin theta) delta)) (.f64 (fma.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (pow.f64 delta #s(literal 3 binary64)) delta) theta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	54.6%	(.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (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(literal 2 binary64))) (pow.f64 (-.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)))) #s(literal -1 binary64)))
	99.8%	#s(approx (+ (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1)))) lambda1) (fma.f64 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1))
	35.9%	#s(approx (+ (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1)))) lambda1) (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))

Compiler

Compiled 5 283 to 1 941 computations (63.3% saved)

regimes392.0ms (2.5%)

Memory

16.2MiB live, 173.3MiB allocated

Counts

133 → 1

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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 theta) (sin delta)) (.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 theta) (sin delta)) (.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)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 (.f64 delta delta) #s(literal -1/6 binary64)) 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 theta) (sin delta)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (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 theta) (sin delta)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (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)) #s(approx (* (sin theta) (sin delta)) #s(approx (+ (* (pow delta 3) (* (sin theta) (+ (* (* delta delta) 1/120) -1/6))) (* (sin theta) delta)) (.f64 (fma.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (pow.f64 delta #s(literal 3 binary64)) 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 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 theta) (sin delta)) (.f64 theta (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) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (.f64 delta (cos.f64 phi1)) (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 #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 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 (-.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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (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 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 delta (.f64 (.f64 #s(literal -1/6 binary64) delta) delta) 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 (/ 1 (/ (pow (sin theta) -1) (* (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))) #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 (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 delta (.f64 (.f64 delta delta) #s(literal -1/6 binary64)) 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 (/.f64 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (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))))
(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (.f64 delta (cos.f64 phi1))) (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))))))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 (.f64 (sin.f64 theta) (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 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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 (/.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 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))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) #s(approx (pow (sin phi1) 2) (*.f64 phi1 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) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta)) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))) lambda1)
(+.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))))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 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)))))) #s(approx (* (sin phi1) (+ (* (* delta (cos theta)) (cos phi1)) (sin phi1))) (.f64 (.f64 (cos.f64 theta) delta) phi1))))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 (pow.f64 (sin.f64 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 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx ( (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) #s(approx (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))))
(+.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 (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (exp.f64 (.f64 (log.f64 (.f64 (sin.f64 theta) (sin.f64 delta))) #s(literal 1 binary64))) (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 (exp.f64 (.f64 (neg.f64 (log.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 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))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+.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 (.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) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (.f64 phi1 (sin.f64 delta)) (cos.f64 theta))))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ ( (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) #s(approx (+ ( (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (exp.f64 (.f64 (log.f64 (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 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))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 delta))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.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)))))) #s(approx (* (sin phi1) (+ (* (* delta (cos theta)) (cos phi1)) (sin phi1))) (*.f64 (fma.f64 delta (cos.f64 phi1) (sin.f64 phi1)) (sin.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 (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)) delta (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta)) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
(+.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 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (/.f64 (sin.f64 delta) (pow.f64 (sin.f64 theta) #s(literal -1/2 binary64))) (/.f64 (cos.f64 phi1) (pow.f64 (sin.f64 theta) #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 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 (.f64 #s(literal -1/6 binary64) delta) delta) 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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
(+.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))))))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(approx (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (cos.f64 delta)) (.f64 (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1)
(+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
(+.f64 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(/.f64 (-.f64 (pow.f64 (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(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (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))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (exp.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)))))))))
(+.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 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (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(literal 2 binary64))) (pow.f64 (-.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)))) #s(literal -1 binary64)))
(+.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))))))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(approx (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (.f64 (cos.f64 phi1) (cos.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (cos.f64 phi1))) delta (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (fma.f64 (fma.f64 (.f64 delta #s(literal -1/2 binary64)) (sin.f64 phi1) (.f64 (cos.f64 theta) (cos.f64 phi1))) delta (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 binary64)) (sin.f64 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) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) delta) delta (.f64 (cos.f64 phi1) (fma.f64 (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)) delta (cos.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta) (.f64 (fma.f64 (.f64 (*.f64 phi1 (sin.f64 delta)) (cos.f64 theta)) #s(literal 2/3 binary64) (neg.f64 (cos.f64 delta))) phi1)) phi1 (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 (.f64 #s(literal -1/6 binary64) delta) delta) delta))) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) #s(approx (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))))
#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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
#s(approx (+ lambda1 (atan2 (/ (cos phi1) (/ 1 (* (sin theta) (sin delta)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
#s(approx (+ (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta))) lambda1) (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
#s(approx (+ (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1)))) lambda1) (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (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))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (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))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (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))
(+.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 phi1 phi1)))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (.f64 (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1)
#s(approx (+ lambda1 (atan2 (/ (cos phi1) (/ 1 (* (sin theta) (sin delta)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (fma.f64 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1))
#s(approx (+ (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta))) lambda1) (fma.f64 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1))
#s(approx (+ (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1)))) lambda1) (fma.f64 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.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 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (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))) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (sin.f64 phi1) (cos.f64 delta)))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (.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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (pow.f64 (pow.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #s(literal 1/2 binary64)) #s(literal 2 binary64))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (pow.f64 (pow.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #s(literal 1/2 binary64)) #s(literal 2 binary64))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.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 (sin.f64 phi1) (sin.f64 (-.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (.f64 (PI.f64) #s(literal 1/2 binary64))) (.f64 #s(literal 2 binary64) (PI.f64)))) (.f64 (PI.f64) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (exp.f64 (.f64 (log.f64 (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (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 (sin.f64 phi1) (sin.f64 (asin.f64 (/.f64 (+.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))) #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)) (+.f64 (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)))) (pow.f64 (fma.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))) #s(literal -1 binary64)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))) (.f64 (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)))) (.f64 (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))))

Outputs

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

Calls

7 calls:

140.0ms	delta
74.0ms	phi1
41.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)))))))))
33.0ms	lambda1
33.0ms	phi2

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 69 to 70 computations (-1.4% saved)

regimes417.0ms (2.7%)

Memory

-6.8MiB live, 190.5MiB allocated

Counts

126 → 1

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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 theta) (sin delta)) (.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 theta) (sin delta)) (.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)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 (.f64 delta delta) #s(literal -1/6 binary64)) 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 theta) (sin delta)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (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 theta) (sin delta)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (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)) #s(approx (* (sin theta) (sin delta)) #s(approx (+ (* (pow delta 3) (* (sin theta) (+ (* (* delta delta) 1/120) -1/6))) (* (sin theta) delta)) (.f64 (fma.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (pow.f64 delta #s(literal 3 binary64)) 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 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 theta) (sin delta)) (.f64 theta (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) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (.f64 delta (cos.f64 phi1)) (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 #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 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 (-.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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (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 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 delta (.f64 (.f64 #s(literal -1/6 binary64) delta) delta) 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 (/ 1 (/ (pow (sin theta) -1) (* (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))) #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 (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 delta (.f64 (.f64 delta delta) #s(literal -1/6 binary64)) 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 (/.f64 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (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))))
(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (.f64 delta (cos.f64 phi1))) (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))))))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 (.f64 (sin.f64 theta) (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 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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 (/.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 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))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) #s(approx (pow (sin phi1) 2) (*.f64 phi1 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) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta)) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))) lambda1)
(+.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))))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 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)))))) #s(approx (* (sin phi1) (+ (* (* delta (cos theta)) (cos phi1)) (sin phi1))) (.f64 (.f64 (cos.f64 theta) delta) phi1))))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 (pow.f64 (sin.f64 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 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx ( (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) #s(approx (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))))
(+.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 (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (exp.f64 (.f64 (log.f64 (.f64 (sin.f64 theta) (sin.f64 delta))) #s(literal 1 binary64))) (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 (exp.f64 (.f64 (neg.f64 (log.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 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))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+.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 (.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) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (.f64 phi1 (sin.f64 delta)) (cos.f64 theta))))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ ( (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) #s(approx (+ ( (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (exp.f64 (.f64 (log.f64 (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 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))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 delta))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.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)))))) #s(approx (* (sin phi1) (+ (* (* delta (cos theta)) (cos phi1)) (sin phi1))) (*.f64 (fma.f64 delta (cos.f64 phi1) (sin.f64 phi1)) (sin.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 (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)) delta (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta)) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
(+.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 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (/.f64 (sin.f64 delta) (pow.f64 (sin.f64 theta) #s(literal -1/2 binary64))) (/.f64 (cos.f64 phi1) (pow.f64 (sin.f64 theta) #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 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 (.f64 #s(literal -1/6 binary64) delta) delta) 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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
(+.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))))))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(approx (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (cos.f64 delta)) (.f64 (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1)
(+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
(+.f64 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(/.f64 (-.f64 (pow.f64 (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(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (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))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (exp.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)))))))))
(+.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 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (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(literal 2 binary64))) (pow.f64 (-.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)))) #s(literal -1 binary64)))
(+.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))))))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(approx (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (.f64 (cos.f64 phi1) (cos.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (cos.f64 phi1))) delta (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (fma.f64 (fma.f64 (.f64 delta #s(literal -1/2 binary64)) (sin.f64 phi1) (.f64 (cos.f64 theta) (cos.f64 phi1))) delta (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 binary64)) (sin.f64 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) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) delta) delta (.f64 (cos.f64 phi1) (fma.f64 (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)) delta (cos.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta) (.f64 (fma.f64 (.f64 (*.f64 phi1 (sin.f64 delta)) (cos.f64 theta)) #s(literal 2/3 binary64) (neg.f64 (cos.f64 delta))) phi1)) phi1 (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 (.f64 #s(literal -1/6 binary64) delta) delta) delta))) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) #s(approx (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))))
#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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
#s(approx (+ lambda1 (atan2 (/ (cos phi1) (/ 1 (* (sin theta) (sin delta)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
#s(approx (+ (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta))) lambda1) (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
#s(approx (+ (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1)))) lambda1) (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (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))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (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))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (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))
(+.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 phi1 phi1)))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (.f64 (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1)
#s(approx (+ lambda1 (atan2 (/ (cos phi1) (/ 1 (* (sin theta) (sin delta)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (fma.f64 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1))
#s(approx (+ (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta))) lambda1) (fma.f64 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1))
#s(approx (+ (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1)))) lambda1) (fma.f64 (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.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 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (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))) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (sin.f64 phi1) (cos.f64 delta)))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (sin.f64 phi1) (cos.f64 delta)))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (.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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (pow.f64 (pow.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #s(literal 1/2 binary64)) #s(literal 2 binary64))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 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 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (pow.f64 (pow.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta)) #s(literal 1/2 binary64)) #s(literal 2 binary64))))

Outputs

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

Calls

7 calls:

172.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))))))))
59.0ms	lambda1
46.0ms	theta
36.0ms	phi2
35.0ms	delta

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 69 to 70 computations (-1.4% saved)

regimes276.0ms (1.8%)

Memory

-9.3MiB live, 147.3MiB allocated

Counts

106 → 1

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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 theta) (sin delta)) (.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 theta) (sin delta)) (.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)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 (.f64 delta delta) #s(literal -1/6 binary64)) 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 theta) (sin delta)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (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 theta) (sin delta)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (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)) #s(approx (* (sin theta) (sin delta)) #s(approx (+ (* (pow delta 3) (* (sin theta) (+ (* (* delta delta) 1/120) -1/6))) (* (sin theta) delta)) (.f64 (fma.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (pow.f64 delta #s(literal 3 binary64)) 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 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 theta) (sin delta)) (.f64 theta (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) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (.f64 delta (cos.f64 phi1)) (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 #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 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 (-.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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (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 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 delta (.f64 (.f64 #s(literal -1/6 binary64) delta) delta) 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 (/ 1 (/ (pow (sin theta) -1) (* (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))) #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 (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 delta (.f64 (.f64 delta delta) #s(literal -1/6 binary64)) 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 (/.f64 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (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))))
(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (.f64 delta (cos.f64 phi1))) (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))))))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 (.f64 (sin.f64 theta) (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 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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 (/.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 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))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) #s(approx (pow (sin phi1) 2) (*.f64 phi1 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) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta)) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))) lambda1)
(+.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))))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 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)))))) #s(approx (* (sin phi1) (+ (* (* delta (cos theta)) (cos phi1)) (sin phi1))) (.f64 (.f64 (cos.f64 theta) delta) phi1))))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 (pow.f64 (sin.f64 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 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx ( (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) #s(approx (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))))
(+.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 (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (exp.f64 (.f64 (log.f64 (.f64 (sin.f64 theta) (sin.f64 delta))) #s(literal 1 binary64))) (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 (exp.f64 (.f64 (neg.f64 (log.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 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))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+.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 (.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) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (.f64 phi1 (sin.f64 delta)) (cos.f64 theta))))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ ( (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) #s(approx (+ ( (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (exp.f64 (.f64 (log.f64 (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 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))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 delta))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.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)))))) #s(approx (* (sin phi1) (+ (* (* delta (cos theta)) (cos phi1)) (sin phi1))) (*.f64 (fma.f64 delta (cos.f64 phi1) (sin.f64 phi1)) (sin.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 (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)) delta (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta)) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
(+.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 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (/.f64 (sin.f64 delta) (pow.f64 (sin.f64 theta) #s(literal -1/2 binary64))) (/.f64 (cos.f64 phi1) (pow.f64 (sin.f64 theta) #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 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 (.f64 #s(literal -1/6 binary64) delta) delta) 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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
(+.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))))))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(approx (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (cos.f64 delta)) (.f64 (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1)
(+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
(+.f64 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(/.f64 (-.f64 (pow.f64 (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(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (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))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (exp.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)))))))))
(+.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 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (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(literal 2 binary64))) (pow.f64 (-.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)))) #s(literal -1 binary64)))
(+.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))))))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(approx (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (.f64 (cos.f64 phi1) (cos.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (cos.f64 phi1))) delta (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (fma.f64 (fma.f64 (.f64 delta #s(literal -1/2 binary64)) (sin.f64 phi1) (.f64 (cos.f64 theta) (cos.f64 phi1))) delta (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 binary64)) (sin.f64 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) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) delta) delta (.f64 (cos.f64 phi1) (fma.f64 (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)) delta (cos.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta) (.f64 (fma.f64 (.f64 (*.f64 phi1 (sin.f64 delta)) (cos.f64 theta)) #s(literal 2/3 binary64) (neg.f64 (cos.f64 delta))) phi1)) phi1 (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 (.f64 #s(literal -1/6 binary64) delta) delta) delta))) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) #s(approx (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))))
#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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
#s(approx (+ lambda1 (atan2 (/ (cos phi1) (/ 1 (* (sin theta) (sin delta)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
#s(approx (+ (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta))) lambda1) (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
#s(approx (+ (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1)))) lambda1) (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (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))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (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))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (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))
(+.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 phi1 phi1)))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))

Outputs

(+.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 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))

Calls

7 calls:

59.0ms	delta
55.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))))))))
39.0ms	phi1
26.0ms	phi2
26.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)))))))))

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 69 to 70 computations (-1.4% saved)

regimes309.0ms (2%)

Memory

38.5MiB live, 193.8MiB allocated

Counts

105 → 1

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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 theta) (sin delta)) (.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 theta) (sin delta)) (.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)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 (.f64 delta delta) #s(literal -1/6 binary64)) 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 theta) (sin delta)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (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 theta) (sin delta)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (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)) #s(approx (* (sin theta) (sin delta)) #s(approx (+ (* (pow delta 3) (* (sin theta) (+ (* (* delta delta) 1/120) -1/6))) (* (sin theta) delta)) (.f64 (fma.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (pow.f64 delta #s(literal 3 binary64)) 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 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 theta) (sin delta)) (.f64 theta (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) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (.f64 delta (cos.f64 phi1)) (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 #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 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 (-.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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (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 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 delta (.f64 (.f64 #s(literal -1/6 binary64) delta) delta) 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 (/ 1 (/ (pow (sin theta) -1) (* (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))) #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 (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 delta (.f64 (.f64 delta delta) #s(literal -1/6 binary64)) 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 (/.f64 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (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))))
(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (.f64 delta (cos.f64 phi1))) (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))))))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 (.f64 (sin.f64 theta) (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 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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 (/.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 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))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) #s(approx (pow (sin phi1) 2) (*.f64 phi1 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) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta)) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))) lambda1)
(+.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))))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 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)))))) #s(approx (* (sin phi1) (+ (* (* delta (cos theta)) (cos phi1)) (sin phi1))) (.f64 (.f64 (cos.f64 theta) delta) phi1))))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 (pow.f64 (sin.f64 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 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx ( (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) #s(approx (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))))
(+.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 (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (exp.f64 (.f64 (log.f64 (.f64 (sin.f64 theta) (sin.f64 delta))) #s(literal 1 binary64))) (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 (exp.f64 (.f64 (neg.f64 (log.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 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))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+.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 (.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) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (.f64 phi1 (sin.f64 delta)) (cos.f64 theta))))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ ( (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) #s(approx (+ ( (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (exp.f64 (.f64 (log.f64 (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 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))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 delta))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.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)))))) #s(approx (* (sin phi1) (+ (* (* delta (cos theta)) (cos phi1)) (sin phi1))) (*.f64 (fma.f64 delta (cos.f64 phi1) (sin.f64 phi1)) (sin.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 (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)) delta (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta)) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
(+.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 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (/.f64 (sin.f64 delta) (pow.f64 (sin.f64 theta) #s(literal -1/2 binary64))) (/.f64 (cos.f64 phi1) (pow.f64 (sin.f64 theta) #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 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 (.f64 #s(literal -1/6 binary64) delta) delta) 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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
(+.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))))))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(approx (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (cos.f64 delta)) (.f64 (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1)
(+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
(+.f64 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(/.f64 (-.f64 (pow.f64 (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(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (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))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (exp.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)))))))))
(+.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 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (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(literal 2 binary64))) (pow.f64 (-.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)))) #s(literal -1 binary64)))
(+.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))))))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(approx (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (.f64 (cos.f64 phi1) (cos.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (cos.f64 phi1))) delta (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (fma.f64 (fma.f64 (.f64 delta #s(literal -1/2 binary64)) (sin.f64 phi1) (.f64 (cos.f64 theta) (cos.f64 phi1))) delta (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 binary64)) (sin.f64 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) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) delta) delta (.f64 (cos.f64 phi1) (fma.f64 (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)) delta (cos.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta) (.f64 (fma.f64 (.f64 (*.f64 phi1 (sin.f64 delta)) (cos.f64 theta)) #s(literal 2/3 binary64) (neg.f64 (cos.f64 delta))) phi1)) phi1 (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 (.f64 #s(literal -1/6 binary64) delta) delta) delta))) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) #s(approx (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))))
#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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
#s(approx (+ lambda1 (atan2 (/ (cos phi1) (/ 1 (* (sin theta) (sin delta)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
#s(approx (+ (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta))) lambda1) (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
#s(approx (+ (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1)))) lambda1) (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (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))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (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))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (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))

Outputs

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

Calls

7 calls:

72.0ms	phi2
58.0ms	phi1
57.0ms	delta
39.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)))))))))
26.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 69 to 70 computations (-1.4% saved)

regimes260.0ms (1.7%)

Memory

-8.4MiB live, 305.5MiB allocated

Counts

102 → 1

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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 theta) (sin delta)) (.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 theta) (sin delta)) (.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)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 (.f64 delta delta) #s(literal -1/6 binary64)) 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 theta) (sin delta)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (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 theta) (sin delta)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (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)) #s(approx (* (sin theta) (sin delta)) #s(approx (+ (* (pow delta 3) (* (sin theta) (+ (* (* delta delta) 1/120) -1/6))) (* (sin theta) delta)) (.f64 (fma.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (pow.f64 delta #s(literal 3 binary64)) 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 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 theta) (sin delta)) (.f64 theta (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) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (.f64 delta (cos.f64 phi1)) (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 #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 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 (-.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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (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 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 delta (.f64 (.f64 #s(literal -1/6 binary64) delta) delta) 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 (/ 1 (/ (pow (sin theta) -1) (* (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))) #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 (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 delta (.f64 (.f64 delta delta) #s(literal -1/6 binary64)) 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 (/.f64 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (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))))
(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (.f64 delta (cos.f64 phi1))) (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))))))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 (.f64 (sin.f64 theta) (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 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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 (/.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 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))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) #s(approx (pow (sin phi1) 2) (*.f64 phi1 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) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta)) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))) lambda1)
(+.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))))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 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)))))) #s(approx (* (sin phi1) (+ (* (* delta (cos theta)) (cos phi1)) (sin phi1))) (.f64 (.f64 (cos.f64 theta) delta) phi1))))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 (pow.f64 (sin.f64 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 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx ( (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) #s(approx (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))))
(+.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 (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (exp.f64 (.f64 (log.f64 (.f64 (sin.f64 theta) (sin.f64 delta))) #s(literal 1 binary64))) (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 (exp.f64 (.f64 (neg.f64 (log.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 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))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+.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 (.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) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (.f64 phi1 (sin.f64 delta)) (cos.f64 theta))))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ ( (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) #s(approx (+ ( (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (exp.f64 (.f64 (log.f64 (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 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))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 delta))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.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)))))) #s(approx (* (sin phi1) (+ (* (* delta (cos theta)) (cos phi1)) (sin phi1))) (*.f64 (fma.f64 delta (cos.f64 phi1) (sin.f64 phi1)) (sin.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 (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)) delta (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta)) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
(+.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 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (/.f64 (sin.f64 delta) (pow.f64 (sin.f64 theta) #s(literal -1/2 binary64))) (/.f64 (cos.f64 phi1) (pow.f64 (sin.f64 theta) #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 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 (.f64 #s(literal -1/6 binary64) delta) delta) 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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
(+.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))))))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(approx (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (cos.f64 delta)) (.f64 (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1)
(+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
(+.f64 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(/.f64 (-.f64 (pow.f64 (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(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (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))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (exp.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)))))))))
(+.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 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (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(literal 2 binary64))) (pow.f64 (-.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)))) #s(literal -1 binary64)))
(+.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))))))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(approx (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (.f64 (cos.f64 phi1) (cos.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (cos.f64 phi1))) delta (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (fma.f64 (fma.f64 (.f64 delta #s(literal -1/2 binary64)) (sin.f64 phi1) (.f64 (cos.f64 theta) (cos.f64 phi1))) delta (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 binary64)) (sin.f64 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) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) delta) delta (.f64 (cos.f64 phi1) (fma.f64 (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)) delta (cos.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta) (.f64 (fma.f64 (.f64 (*.f64 phi1 (sin.f64 delta)) (cos.f64 theta)) #s(literal 2/3 binary64) (neg.f64 (cos.f64 delta))) phi1)) phi1 (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 (.f64 #s(literal -1/6 binary64) delta) delta) delta))) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) #s(approx (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))))
#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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
#s(approx (+ lambda1 (atan2 (/ (cos phi1) (/ 1 (* (sin theta) (sin delta)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
#s(approx (+ (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta))) lambda1) (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
#s(approx (+ (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1)))) lambda1) (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (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))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)

Outputs

(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (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))))

Calls

7 calls:

47.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))))))))
46.0ms	phi2
39.0ms	lambda1
35.0ms	phi1
31.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 69 to 70 computations (-1.4% saved)

regimes261.0ms (1.7%)

Memory

-15.8MiB live, 344.7MiB allocated

Counts

100 → 1

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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 theta) (sin delta)) (.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 theta) (sin delta)) (.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)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 (.f64 delta delta) #s(literal -1/6 binary64)) 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 theta) (sin delta)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (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 theta) (sin delta)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (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)) #s(approx (* (sin theta) (sin delta)) #s(approx (+ (* (pow delta 3) (* (sin theta) (+ (* (* delta delta) 1/120) -1/6))) (* (sin theta) delta)) (.f64 (fma.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (pow.f64 delta #s(literal 3 binary64)) 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 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 theta) (sin delta)) (.f64 theta (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) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (.f64 delta (cos.f64 phi1)) (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 #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 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 (-.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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (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 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 delta (.f64 (.f64 #s(literal -1/6 binary64) delta) delta) 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 (/ 1 (/ (pow (sin theta) -1) (* (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))) #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 (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 delta (.f64 (.f64 delta delta) #s(literal -1/6 binary64)) 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 (/.f64 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (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))))
(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (.f64 delta (cos.f64 phi1))) (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))))))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 (.f64 (sin.f64 theta) (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 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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 (/.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 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))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) #s(approx (pow (sin phi1) 2) (*.f64 phi1 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) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta)) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))) lambda1)
(+.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))))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 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)))))) #s(approx (* (sin phi1) (+ (* (* delta (cos theta)) (cos phi1)) (sin phi1))) (.f64 (.f64 (cos.f64 theta) delta) phi1))))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 (pow.f64 (sin.f64 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 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx ( (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) #s(approx (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))))
(+.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 (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (exp.f64 (.f64 (log.f64 (.f64 (sin.f64 theta) (sin.f64 delta))) #s(literal 1 binary64))) (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 (exp.f64 (.f64 (neg.f64 (log.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 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))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+.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 (.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) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (.f64 phi1 (sin.f64 delta)) (cos.f64 theta))))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ ( (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) #s(approx (+ ( (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (exp.f64 (.f64 (log.f64 (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 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))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 delta))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.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)))))) #s(approx (* (sin phi1) (+ (* (* delta (cos theta)) (cos phi1)) (sin phi1))) (*.f64 (fma.f64 delta (cos.f64 phi1) (sin.f64 phi1)) (sin.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 (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)) delta (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta)) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
(+.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 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (/.f64 (sin.f64 delta) (pow.f64 (sin.f64 theta) #s(literal -1/2 binary64))) (/.f64 (cos.f64 phi1) (pow.f64 (sin.f64 theta) #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 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 (.f64 #s(literal -1/6 binary64) delta) delta) 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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
(+.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))))))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(approx (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (cos.f64 delta)) (.f64 (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1)
(+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
(+.f64 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(/.f64 (-.f64 (pow.f64 (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(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (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))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (exp.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)))))))))
(+.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 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (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(literal 2 binary64))) (pow.f64 (-.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)))) #s(literal -1 binary64)))
(+.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))))))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (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) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(approx (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (.f64 (cos.f64 phi1) (cos.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (cos.f64 phi1))) delta (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (fma.f64 (fma.f64 (.f64 delta #s(literal -1/2 binary64)) (sin.f64 phi1) (.f64 (cos.f64 theta) (cos.f64 phi1))) delta (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx ( (cos delta) (sin phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 binary64)) (sin.f64 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) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) delta) delta (.f64 (cos.f64 phi1) (fma.f64 (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)) delta (cos.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) #s(approx ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 theta (cos.f64 phi1)) (sin.f64 delta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 (sin.f64 theta) delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (fma.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta) (.f64 (fma.f64 (.f64 (*.f64 phi1 (sin.f64 delta)) (cos.f64 theta)) #s(literal 2/3 binary64) (neg.f64 (cos.f64 delta))) phi1)) phi1 (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 (.f64 #s(literal -1/6 binary64) delta) delta) delta))) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 delta) (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) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) #s(approx (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))))
#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 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
#s(approx (+ lambda1 (atan2 (/ (cos phi1) (/ 1 (* (sin theta) (sin delta)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
#s(approx (+ (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta))) lambda1) (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
#s(approx (+ (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1)))) lambda1) (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))

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)))))) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))

Calls

7 calls:

48.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)))))))))
43.0ms	phi2
38.0ms	phi1
35.0ms	lambda1
33.0ms	theta

Results

Accuracy	Segments	Branch
94.2%	1	`lambda1`
94.2%	1	`phi1`
94.2%	1	`phi2`
94.2%	1	`delta`
94.2%	1	`theta`
94.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)))))))))`
94.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 69 to 70 computations (-1.4% saved)

regimes208.0ms (1.3%)

Memory

18.3MiB live, 297.2MiB allocated

Counts

79 → 1

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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 theta) (sin delta)) (.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 theta) (sin delta)) (.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)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 (.f64 delta delta) #s(literal -1/6 binary64)) 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 theta) (sin delta)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (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 theta) (sin delta)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (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)) #s(approx (* (sin theta) (sin delta)) #s(approx (+ (* (pow delta 3) (* (sin theta) (+ (* (* delta delta) 1/120) -1/6))) (* (sin theta) delta)) (.f64 (fma.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (pow.f64 delta #s(literal 3 binary64)) 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 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 theta) (sin delta)) (.f64 theta (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) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (.f64 delta (cos.f64 phi1)) (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 #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 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 (-.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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (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 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 delta (.f64 (.f64 #s(literal -1/6 binary64) delta) delta) 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 (/ 1 (/ (pow (sin theta) -1) (* (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))) #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 (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 delta (.f64 (.f64 delta delta) #s(literal -1/6 binary64)) 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 (/.f64 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (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))))
(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (.f64 delta (cos.f64 phi1))) (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))))))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 (.f64 (sin.f64 theta) (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 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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 (/.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 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))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) #s(approx (pow (sin phi1) 2) (*.f64 phi1 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) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta)) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))) lambda1)
(+.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))))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 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)))))) #s(approx (* (sin phi1) (+ (* (* delta (cos theta)) (cos phi1)) (sin phi1))) (.f64 (.f64 (cos.f64 theta) delta) phi1))))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 (pow.f64 (sin.f64 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 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx ( (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) #s(approx (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))))
(+.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 (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (exp.f64 (.f64 (log.f64 (.f64 (sin.f64 theta) (sin.f64 delta))) #s(literal 1 binary64))) (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 (exp.f64 (.f64 (neg.f64 (log.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 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))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+.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 (.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) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (.f64 phi1 (sin.f64 delta)) (cos.f64 theta))))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ ( (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.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 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 (cos.f64 delta) #s(approx (+ ( (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (exp.f64 (.f64 (log.f64 (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (sin.f64 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))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 delta))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.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)))))) #s(approx (* (sin phi1) (+ (* (* delta (cos theta)) (cos phi1)) (sin phi1))) (*.f64 (fma.f64 delta (cos.f64 phi1) (sin.f64 phi1)) (sin.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 (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)) delta (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta)) (.f64 (cos.f64 phi1) (fma.f64 (neg.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
(+.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 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (cos.f64 delta) phi1)) phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (/.f64 (sin.f64 delta) (pow.f64 (sin.f64 theta) #s(literal -1/2 binary64))) (/.f64 (cos.f64 phi1) (pow.f64 (sin.f64 theta) #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 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 (.f64 #s(literal -1/6 binary64) delta) delta) 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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
(+.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))))))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 delta)))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(approx (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (cos.f64 delta)) (.f64 (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1)
(+.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))))
(+.f64 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 theta (sin.f64 delta))) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) #s(approx (* (cos delta) (sin phi1)) (sin.f64 phi1))) (cos.f64 delta))) lambda1)
(/.f64 (-.f64 (pow.f64 (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(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (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))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (exp.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)))))))))
(+.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 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (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(literal 2 binary64))) (pow.f64 (-.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)))) #s(literal -1 binary64)))
(+.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))))))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))

Outputs

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

Calls

7 calls:

43.0ms	phi2
42.0ms	theta
34.0ms	lambda1
21.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)))))))))
21.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
91.7%	1	`lambda1`
91.7%	1	`phi1`
91.7%	1	`phi2`
91.7%	1	`delta`
91.7%	1	`theta`
91.7%	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)))))))))`
91.7%	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 69 to 70 computations (-1.4% saved)

regimes123.0ms (0.8%)

Memory

-20.8MiB live, 178.2MiB allocated

Counts

49 → 1

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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 theta) (sin delta)) (.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 theta) (sin delta)) (.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)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 (.f64 delta delta) #s(literal -1/6 binary64)) 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 theta) (sin delta)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (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 theta) (sin delta)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (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)) #s(approx (* (sin theta) (sin delta)) #s(approx (+ (* (pow delta 3) (* (sin theta) (+ (* (* delta delta) 1/120) -1/6))) (* (sin theta) delta)) (.f64 (fma.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (pow.f64 delta #s(literal 3 binary64)) 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 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 theta) (sin delta)) (.f64 theta (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) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (.f64 delta (cos.f64 phi1)) (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 #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 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 (-.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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (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 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 delta (.f64 (.f64 #s(literal -1/6 binary64) delta) delta) 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 (/ 1 (/ (pow (sin theta) -1) (* (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))) #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 (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 delta (.f64 (.f64 delta delta) #s(literal -1/6 binary64)) 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 (/.f64 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (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))))
(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (.f64 delta (cos.f64 phi1))) (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))))))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 (.f64 (sin.f64 theta) (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 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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 (/.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 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))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) #s(approx (pow (sin phi1) 2) (*.f64 phi1 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) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta)) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))) lambda1)
(+.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))))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 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)))))) #s(approx (* (sin phi1) (+ (* (* delta (cos theta)) (cos phi1)) (sin phi1))) (.f64 (.f64 (cos.f64 theta) delta) phi1))))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 (pow.f64 (sin.f64 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 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx ( (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) #s(approx (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))))
(+.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 (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (exp.f64 (.f64 (log.f64 (.f64 (sin.f64 theta) (sin.f64 delta))) #s(literal 1 binary64))) (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 (exp.f64 (.f64 (neg.f64 (log.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 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))))

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:

25.0ms	theta
15.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))))))))
14.0ms	delta
14.0ms	phi1
13.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)))))))))

Results

Accuracy	Segments	Branch
91.7%	1	`lambda1`
91.7%	1	`phi2`
91.7%	1	`delta`
91.7%	1	`phi1`
91.7%	1	`theta`
91.7%	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)))))))))`
91.7%	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 69 to 70 computations (-1.4% saved)

regimes103.0ms (0.7%)

Memory

12.2MiB live, 173.2MiB allocated

Counts

44 → 1

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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 theta) (sin delta)) (.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 theta) (sin delta)) (.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)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 (.f64 delta delta) #s(literal -1/6 binary64)) 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 theta) (sin delta)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (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 theta) (sin delta)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (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)) #s(approx (* (sin theta) (sin delta)) #s(approx (+ (* (pow delta 3) (* (sin theta) (+ (* (* delta delta) 1/120) -1/6))) (* (sin theta) delta)) (.f64 (fma.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (pow.f64 delta #s(literal 3 binary64)) 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 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 theta) (sin delta)) (.f64 theta (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) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (.f64 delta (cos.f64 phi1)) (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 #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 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 (-.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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (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 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 delta (.f64 (.f64 #s(literal -1/6 binary64) delta) delta) 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 (/ 1 (/ (pow (sin theta) -1) (* (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))) #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 (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 delta (.f64 (.f64 delta delta) #s(literal -1/6 binary64)) 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 (/.f64 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (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))))
(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (.f64 delta (cos.f64 phi1))) (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))))))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 (.f64 (sin.f64 theta) (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 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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 (/.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 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))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) #s(approx (pow (sin phi1) 2) (*.f64 phi1 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) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta)) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))) lambda1)
(+.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))))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 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)))))) #s(approx (* (sin phi1) (+ (* (* delta (cos theta)) (cos phi1)) (sin phi1))) (.f64 (.f64 (cos.f64 theta) delta) phi1))))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 (pow.f64 (sin.f64 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 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx ( (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) #s(approx (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))))

Outputs

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

Calls

7 calls:

24.0ms	theta
16.0ms	phi2
13.0ms	delta
13.0ms	phi1
12.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)))))))))

Results

Accuracy	Segments	Branch
91.6%	1	`phi1`
91.6%	1	`delta`
91.6%	1	`lambda1`
91.6%	1	`phi2`
91.6%	1	`theta`
91.6%	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)))))))))`
91.6%	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 69 to 70 computations (-1.4% saved)

regimes96.0ms (0.6%)

Memory

19.9MiB live, 142.1MiB allocated

Counts

43 → 3

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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 theta) (sin delta)) (.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 theta) (sin delta)) (.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)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 (.f64 delta delta) #s(literal -1/6 binary64)) 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 theta) (sin delta)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (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 theta) (sin delta)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (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)) #s(approx (* (sin theta) (sin delta)) #s(approx (+ (* (pow delta 3) (* (sin theta) (+ (* (* delta delta) 1/120) -1/6))) (* (sin theta) delta)) (.f64 (fma.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (pow.f64 delta #s(literal 3 binary64)) 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 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 theta) (sin delta)) (.f64 theta (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) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (.f64 delta (cos.f64 phi1)) (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 #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 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 (-.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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (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 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 delta (.f64 (.f64 #s(literal -1/6 binary64) delta) delta) 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 (/ 1 (/ (pow (sin theta) -1) (* (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))) #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 (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 delta (.f64 (.f64 delta delta) #s(literal -1/6 binary64)) 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 (/.f64 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (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))))
(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (.f64 delta (cos.f64 phi1))) (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))))))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 (.f64 (sin.f64 theta) (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 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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 (/.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 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))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) #s(approx (pow (sin phi1) 2) (*.f64 phi1 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) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta)) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))) lambda1)
(+.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))))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 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)))))) #s(approx (* (sin phi1) (+ (* (* delta (cos theta)) (cos phi1)) (sin phi1))) (.f64 (.f64 (cos.f64 theta) delta) phi1))))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 (pow.f64 (sin.f64 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 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx ( (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) #s(approx (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))))

Outputs

(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (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 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) #s(approx (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))))

(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 (pow.f64 (sin.f64 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

7 calls:

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))))))))
16.0ms	phi2
14.0ms	lambda1
12.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)))))))))
11.0ms	delta

Results

Accuracy	Segments	Branch
88.4%	1	`phi1`
88.4%	1	`phi2`
92.1%	3	`delta`
88.4%	1	`lambda1`
88.4%	1	`theta`
88.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)))))))))`
88.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 69 to 70 computations (-1.4% saved)

regimes14.0ms (0.1%)

Memory

-10.9MiB live, 27.9MiB allocated

Counts

42 → 3

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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 theta) (sin delta)) (.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 theta) (sin delta)) (.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)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 (.f64 delta delta) #s(literal -1/6 binary64)) 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 theta) (sin delta)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (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 theta) (sin delta)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (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)) #s(approx (* (sin theta) (sin delta)) #s(approx (+ (* (pow delta 3) (* (sin theta) (+ (* (* delta delta) 1/120) -1/6))) (* (sin theta) delta)) (.f64 (fma.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (pow.f64 delta #s(literal 3 binary64)) 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 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 theta) (sin delta)) (.f64 theta (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) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (.f64 delta (cos.f64 phi1)) (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 #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 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 (-.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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (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 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 delta (.f64 (.f64 #s(literal -1/6 binary64) delta) delta) 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 (/ 1 (/ (pow (sin theta) -1) (* (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))) #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 (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 delta (.f64 (.f64 delta delta) #s(literal -1/6 binary64)) 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 (/.f64 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (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))))
(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (.f64 delta (cos.f64 phi1))) (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))))))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 (.f64 (sin.f64 theta) (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 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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 (/.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 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))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) #s(approx (pow (sin phi1) 2) (*.f64 phi1 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) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta)) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))) lambda1)
(+.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))))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 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)))))) #s(approx (* (sin phi1) (+ (* (* delta (cos theta)) (cos phi1)) (sin phi1))) (.f64 (.f64 (cos.f64 theta) delta) phi1))))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 (pow.f64 (sin.f64 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 (/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 theta) #s(literal -1 binary64)) (.f64 (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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx ( (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))))

Outputs

(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (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 (*.f64 (sin.f64 theta) (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) (cos.f64 phi1)))))

(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 (pow.f64 (sin.f64 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

1 calls:

12.0ms

delta

Results

Accuracy	Segments	Branch
92.1%	3	`delta`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes13.0ms (0.1%)

Memory

-14.3MiB live, 24.7MiB allocated

Counts

38 → 3

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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 theta) (sin delta)) (.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 theta) (sin delta)) (.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)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 (.f64 delta delta) #s(literal -1/6 binary64)) 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 theta) (sin delta)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (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 theta) (sin delta)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (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)) #s(approx (* (sin theta) (sin delta)) #s(approx (+ (* (pow delta 3) (* (sin theta) (+ (* (* delta delta) 1/120) -1/6))) (* (sin theta) delta)) (.f64 (fma.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (pow.f64 delta #s(literal 3 binary64)) 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 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 theta) (sin delta)) (.f64 theta (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) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (.f64 delta (cos.f64 phi1)) (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 #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 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 (-.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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (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 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 delta (.f64 (.f64 #s(literal -1/6 binary64) delta) delta) 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 (/ 1 (/ (pow (sin theta) -1) (* (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))) #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 (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 delta (.f64 (.f64 delta delta) #s(literal -1/6 binary64)) 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 (/.f64 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (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))))
(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (.f64 delta (cos.f64 phi1))) (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))))))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 (.f64 (sin.f64 theta) (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 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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 (/.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 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))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) #s(approx (pow (sin phi1) 2) (*.f64 phi1 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) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (/ 1 (/ 1 (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (+ (* (neg (sin phi1)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1)))) (cos delta)) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (- (cos delta) (* (cos delta) (pow (sin phi1) 2))) (* (* (sin phi1) (* (sin delta) (cos theta))) (cos phi1))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))) lambda1)
(+.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))))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 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)))))) #s(approx (* (sin phi1) (+ (* (* delta (cos theta)) (cos phi1)) (sin phi1))) (.f64 (.f64 (cos.f64 theta) delta) phi1))))))

Outputs

(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (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 (*.f64 (sin.f64 theta) (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) (cos.f64 phi1)))))

(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (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

1 calls:

11.0ms

delta

Results

Accuracy	Segments	Branch
92.1%	3	`delta`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes77.0ms (0.5%)

Memory

-2.0MiB live, 117.4MiB allocated

Counts

32 → 1

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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 theta) (sin delta)) (.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 theta) (sin delta)) (.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)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 (.f64 delta delta) #s(literal -1/6 binary64)) 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 theta) (sin delta)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (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 theta) (sin delta)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (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)) #s(approx (* (sin theta) (sin delta)) #s(approx (+ (* (pow delta 3) (* (sin theta) (+ (* (* delta delta) 1/120) -1/6))) (* (sin theta) delta)) (.f64 (fma.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (pow.f64 delta #s(literal 3 binary64)) 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 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 theta) (sin delta)) (.f64 theta (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) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (.f64 delta (cos.f64 phi1)) (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 #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 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 (-.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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (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 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 delta (.f64 (.f64 #s(literal -1/6 binary64) delta) delta) 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 (/ 1 (/ (pow (sin theta) -1) (* (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))) #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 (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 delta (.f64 (.f64 delta delta) #s(literal -1/6 binary64)) 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 (/.f64 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (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))))
(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (.f64 delta (cos.f64 phi1))) (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))))))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 (.f64 (sin.f64 theta) (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 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (pow.f64 delta #s(literal 3 binary64)) (.f64 (sin.f64 theta) (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.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 (/.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 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))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) #s(approx (pow (sin phi1) 2) (*.f64 phi1 phi1))))))))

Outputs

(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (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:

20.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))))))))
10.0ms	lambda1
9.0ms	delta
9.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)))))))))

Results

Accuracy	Segments	Branch
88.4%	1	`lambda1`
88.4%	1	`phi1`
88.4%	1	`phi2`
88.4%	1	`theta`
88.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)))))))))`
88.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))))))))`
88.4%	1	`delta`

Compiler

Compiled 69 to 70 computations (-1.4% saved)

regimes83.0ms (0.5%)

Memory

4.8MiB live, 85.7MiB allocated

Counts

22 → 1

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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 theta) (sin delta)) (.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 theta) (sin delta)) (.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)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 (.f64 delta delta) #s(literal -1/6 binary64)) 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 theta) (sin delta)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (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 theta) (sin delta)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (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)) #s(approx (* (sin theta) (sin delta)) #s(approx (+ (* (pow delta 3) (* (sin theta) (+ (* (* delta delta) 1/120) -1/6))) (* (sin theta) delta)) (.f64 (fma.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (pow.f64 delta #s(literal 3 binary64)) 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 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 theta) (sin delta)) (.f64 theta (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) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (.f64 delta (cos.f64 phi1)) (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 #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 #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 (-.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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (.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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (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 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 delta (.f64 (.f64 #s(literal -1/6 binary64) delta) delta) 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 (/ 1 (/ (pow (sin theta) -1) (* (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))) #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 (/ 1 (/ (pow (sin theta) -1) (* (cos phi1) (sin delta)))) (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 delta (.f64 (.f64 delta delta) #s(literal -1/6 binary64)) 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 (/.f64 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (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))))
(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) #s(approx (/ (pow (sin theta) -1) (* (cos phi1) (sin delta))) (/.f64 (/.f64 #s(literal 1 binary64) (.f64 delta (cos.f64 phi1))) (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))))))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))

Outputs

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

Calls

7 calls:

27.0ms	lambda1
22.0ms	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)))))))))
6.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))))))))
6.0ms	phi2

Results

Accuracy	Segments	Branch
85.7%	1	`lambda1`
85.7%	1	`phi1`
85.7%	1	`phi2`
85.7%	1	`delta`
85.7%	1	`theta`
85.7%	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)))))))))`
85.7%	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 69 to 70 computations (-1.4% saved)

regimes22.0ms (0.1%)

Memory

10.5MiB live, 49.6MiB allocated

Counts

7 → 3

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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 theta) (sin delta)) (.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 theta) (sin delta)) (.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)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 (.f64 delta delta) #s(literal -1/6 binary64)) 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 theta) (sin delta)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (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 theta) (sin delta)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) theta) theta #s(literal 1 binary64)) (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)) #s(approx (* (sin theta) (sin delta)) #s(approx (+ (* (pow delta 3) (* (sin theta) (+ (* (* delta delta) 1/120) -1/6))) (* (sin theta) delta)) (.f64 (fma.f64 (fma.f64 (.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (pow.f64 delta #s(literal 3 binary64)) delta) 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 theta) (sin delta)) (*.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 theta) (sin delta)) (*.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 theta) (sin delta)) (*.f64 (sin.f64 theta) (fma.f64 delta (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) 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:

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))))))))
3.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)))))))))
3.0ms	theta
3.0ms	delta
3.0ms	lambda1

Results

Accuracy	Segments	Branch
74.4%	1	`lambda1`
80.8%	3	`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	`phi1`
74.4%	1	`phi2`
80.6%	3	`delta`
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)))))))))`

Compiler

Compiled 69 to 70 computations (-1.4% saved)

regimes4.0ms (0%)

Memory

10.6MiB live, 10.6MiB allocated

Counts

3 → 3

Calls

Call 1

Inputs

(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.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 theta) (sin delta)) (*.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 theta) (sin delta)) (*.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))))

Outputs

(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.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 theta) (sin delta)) (*.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 theta) (sin delta)) (*.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))))

Calls

2 calls:

2.0ms	delta
2.0ms	theta

Results

Accuracy	Segments	Branch
80.5%	3	`delta`
80.6%	3	`theta`

Compiler

Compiled 2 to 10 computations (-400% saved)

regimes5.0ms (0%)

Memory

-28.6MiB live, 10.8MiB 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 theta) (sin delta)) (*.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))))

Outputs

(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.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

3 calls:

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

theta

1.0ms

delta

Results

Accuracy	Segments	Branch
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	`delta`
74.4%	1	`theta`

Compiler

Compiled 33 to 32 computations (3% saved)

bsearch68.0ms (0.4%)

Memory

22.2MiB live, 102.6MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
36.0ms	0.0002445684480400888	0.244465757280708
27.0ms	-224754.09724870708	-65954.00470907812

Samples

53.0ms

208×

valid

Compiler

Compiled 507 to 476 computations (6.1% saved)

Precisions

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

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

ival-cos: 11.0ms (23.9% of total)

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

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

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

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

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

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

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

bsearch2.0ms (0%)

Memory

4.5MiB live, 4.4MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	0.0002445684480400888	0.244465757280708
1.0ms	-224754.09724870708	-65954.00470907812

Compiler

Compiled 455 to 437 computations (4% saved)

bsearch2.0ms (0%)

Memory

3.5MiB live, 3.5MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	0.0002445684480400888	0.244465757280708
1.0ms	-224754.09724870708	-65954.00470907812

Compiler

Compiled 439 to 421 computations (4.1% saved)

bsearch123.0ms (0.8%)

Memory

-17.9MiB live, 140.5MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
56.0ms	1.174722867384336e+39	1.0402495984204024e+48
60.0ms	-3.9260815014817414e+35	-6.560785613312509e+30

Samples

71.0ms

272×

valid

Compiler

Compiled 507 to 543 computations (-7.1% saved)

Precisions

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

ival-sin: 23.0ms (37.5% of total)

ival-cos: 17.0ms (27.7% of total)

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

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

ival-atan2: 3.0ms (4.9% of total)

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

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

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

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

bsearch32.0ms (0.2%)

Memory

-10.5MiB live, 28.7MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
15.0ms	6741153259055281.0	8014551026577102.0
1.0ms	-3.9260815014817414e+35	-6.560785613312509e+30

Samples

13.0ms

48×

valid

Compiler

Compiled 300 to 339 computations (-13% saved)

Precisions

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

ival-sin: 4.0ms (35.4% of total)

ival-cos: 3.0ms (26.5% of total)

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

ival-asin: 1.0ms (8.8% of total)

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

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

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

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

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

simplify60.0ms (0.4%)

Memory

8.8MiB live, 87.4MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	158	1123
1	225	1123
2	277	1123
3	317	1123
4	361	1123
5	402	1123
6	426	1123
7	509	1123
8	603	1123

Stop Event

1×

saturated

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (.f64 (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1)
(+.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 phi1 phi1)))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (cos.f64 delta))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (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))))
(+.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 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+.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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))))
(if (<=.f64 delta #s(literal -66000 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 1152921504606847/4611686018427387904 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) #s(approx (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))) (.f64 (cos.f64 phi1) (cos.f64 phi1))))))) (+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 (pow.f64 (sin.f64 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 -66000 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 1152921504606847/4611686018427387904 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 (cos.f64 phi1) (cos.f64 phi1))))) (+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 (pow.f64 (sin.f64 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 -66000 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 1152921504606847/4611686018427387904 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 (cos.f64 phi1) (cos.f64 phi1))))) (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 theta #s(literal -7000000000000000420667350581248 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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 1200000000000000048543581607386731773952 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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 theta) (sin delta)) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 (.f64 delta delta) #s(literal -1/6 binary64)) 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 -7000000000000000420667350581248 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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 6800000000000000 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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 theta) (sin delta)) (.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 theta) (sin delta)) (.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))))

Outputs
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (exp.f64 (log.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (cos.f64 delta) (.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (.f64 (.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (cos.f64 delta))) (.f64 (.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (sin.f64 phi1)) (cos.f64 phi1)))) lambda1)
(+.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 phi1 phi1)))) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (cos.f64 delta) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (cos.f64 delta))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (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))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1))))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos delta) (sin phi1))) (sin.f64 phi1)) (cos.f64 delta))) lambda1)
(+.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 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.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))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) #s(approx (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))) lambda1)
(if (<=.f64 delta #s(literal -66000 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 1152921504606847/4611686018427387904 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) #s(approx (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))) (.f64 (cos.f64 phi1) (cos.f64 phi1))))))) (+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 (pow.f64 (sin.f64 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 -66000 binary64)) (+.f64 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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) (if (<=.f64 delta #s(literal 1152921504606847/4611686018427387904 binary64)) (+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) #s(approx (- (cos delta) (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (sin phi1))) (.f64 (cos.f64 phi1) (cos.f64 phi1)))))) lambda1) (+.f64 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 (pow.f64 (sin.f64 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))) lambda1)))
(if (<=.f64 delta #s(literal -66000 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 1152921504606847/4611686018427387904 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 (cos.f64 phi1) (cos.f64 phi1))))) (+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 (pow.f64 (sin.f64 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 -66000 binary64)) (+.f64 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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) (if (<=.f64 delta #s(literal 1152921504606847/4611686018427387904 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) (cos.f64 phi1)))) lambda1) (+.f64 (atan2.f64 (/.f64 (cos.f64 phi1) (/.f64 (pow.f64 (sin.f64 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))) lambda1)))
(if (<=.f64 delta #s(literal -66000 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 1152921504606847/4611686018427387904 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 (cos.f64 phi1) (cos.f64 phi1))))) (+.f64 lambda1 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 -66000 binary64)) (+.f64 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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) (if (<=.f64 delta #s(literal 1152921504606847/4611686018427387904 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) (cos.f64 phi1)))) lambda1) (+.f64 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 (cos.f64 phi1) (sin.f64 delta)) (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 (.f64 (cos.f64 phi1) (sin.f64 delta)) (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 #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))))
(+.f64 (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)
(if (<=.f64 theta #s(literal -7000000000000000420667350581248 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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 1200000000000000048543581607386731773952 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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 theta) (sin delta)) (.f64 (sin.f64 theta) (fma.f64 delta (.f64 (.f64 delta delta) #s(literal -1/6 binary64)) 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 -7000000000000000420667350581248 binary64)) (+.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.f64 delta (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) (if (<=.f64 theta #s(literal 1200000000000000048543581607386731773952 binary64)) (+.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) lambda1) (+.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.f64 (fma.f64 delta (.f64 #s(literal -1/6 binary64) (.f64 delta delta)) delta) (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)))
(if (<=.f64 theta #s(literal -7000000000000000420667350581248 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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 6800000000000000 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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 theta) (sin delta)) (.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 -7000000000000000420667350581248 binary64)) (+.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.f64 delta (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) (if (<=.f64 theta #s(literal 6800000000000000 binary64)) (+.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) lambda1) (+.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.f64 delta (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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (.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))) lambda1)

soundness1.6s (10.2%)

Memory

33.7MiB live, 1 288.2MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	427	24698
1	1515	23159
2	5396	22971
0	8539	21912
0	22	147
0	40	139
1	120	139
2	846	139
0	8744	133
0	281	5807
1	976	5684
2	3436	5625
3	6008	5582
0	8060	5302
0	71	589
0	115	578
1	401	526
2	2942	526
0	8285	526
0	485	20478
1	1642	19066
2	5621	18845
0	8218	18019
0	76	730
0	125	708
1	452	702
2	3125	702
0	8389	689
0	65	665
0	110	622
1	398	604
2	2660	604
0	9274	604

Stop Event

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

Compiler

Compiled 1 758 to 991 computations (43.6% saved)

preprocess179.0ms (1.2%)

Memory: 24.7MiB live, 214.3MiB allocated
Remove: (abs phi2)
Compiler: Compiled 2 072 to 936 computations (54.8% saved)

end0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated

start0.0ms (0%)

analyze1.2s (7.8%)

sample3.1s (20.3%)

explain442.0ms (2.9%)

preprocess245.0ms (1.6%)

eval0.0ms (0%)

prune1.0ms (0%)

simplify50.0ms (0.3%)

localize101.0ms (0.7%)

series51.0ms (0.3%)

simplify265.0ms (1.7%)

rewrite211.0ms (1.4%)

eval141.0ms (0.9%)

prune51.0ms (0.3%)

simplify221.0ms (1.4%)

localize265.0ms (1.7%)

series120.0ms (0.8%)

simplify252.0ms (1.6%)

rewrite274.0ms (1.8%)

eval507.0ms (3.3%)

prune129.0ms (0.8%)

simplify149.0ms (1%)

localize246.0ms (1.6%)

series160.0ms (1%)

simplify240.0ms (1.5%)

rewrite213.0ms (1.4%)

eval331.0ms (2.1%)

prune195.0ms (1.3%)

simplify178.0ms (1.2%)

localize304.0ms (2%)

series150.0ms (1%)

simplify311.0ms (2%)

rewrite174.0ms (1.1%)

eval282.0ms (1.8%)

prune174.0ms (1.1%)

regimes392.0ms (2.5%)

regimes417.0ms (2.7%)

regimes276.0ms (1.8%)

regimes309.0ms (2%)

regimes260.0ms (1.7%)

regimes261.0ms (1.7%)

regimes208.0ms (1.3%)

regimes123.0ms (0.8%)

regimes103.0ms (0.7%)

regimes96.0ms (0.6%)

regimes14.0ms (0.1%)

regimes13.0ms (0.1%)

regimes77.0ms (0.5%)

regimes83.0ms (0.5%)

regimes22.0ms (0.1%)

regimes4.0ms (0%)

regimes5.0ms (0%)

bsearch68.0ms (0.4%)

bsearch2.0ms (0%)

bsearch2.0ms (0%)

bsearch123.0ms (0.8%)

bsearch32.0ms (0.2%)

simplify60.0ms (0.4%)

soundness1.6s (10.2%)

preprocess179.0ms (1.2%)

end0.0ms (0%)

Profiling